[AccessD] Listing open forms

Steve
Unless they've changed things in later versions the Forms collection is only
open forms in A97. This shows them:

Dim frm As Form
' Enumerate Forms collection.
For Each frm In Forms
  ' Print name of form.
  Debug.Print frm.Name
Next frm

-- Andy Lacey
http://www.minstersystems.co.uk 

> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com 
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of 
> Steve Capistrant
> Sent: 12 March 2005 18:20
> To: Access Developers discussion and problem solving
> Subject: [AccessD] Listing open forms
> 
> 
> Gang,
> 
> I'm interested in displaying a list of open forms, allowing 
> the user to toggle among currently open forms (but not any .  
> Using the built in Windows menu is not an option because it 
> exposes things I don't want the
> user messing with (e.g. Unhide...).   I can alter the built in Windows
> menu to exclude unwanted items, but that is a global setting, 
> affecting ALL Access apps.
> 
> Option 1.  Create a custom version of the WINDOWS menu on an 
> Access menu bar.  But I can't figure out how to reproduce the 
> built in feature; its not a fixed "item" on the list with 
> code I can copy.  Also, how would I limit the objects to forms only?
> 
> Option 2.  Create a popup form, which can be called from any 
> context, containing a listbox showing all open forms.  This 
> is my second choice, but acceptable if necessary.  I assume 
> it involves looping through the forms collection and applying 
> an IsLoaded() function.  
> 
> Any tips or hints?  Thanks.
> 
> Steve Capistrant
> scapistrant at symphonyinfo.com
> Symphony Information Services
> 7308 Aspen Lane North, Suite 132
> Brooklyn Park, MN  55428
> 763-391-7400
> www.symphonyinfo.com
> 
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com 
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 
>