Hi Steve, I'm thinking along similar lines.
I don't know this for sure but I thought Window-Eyes settings were only applicable for visible windows. If this is true, you could add another conditional within the loop along the lines of If oTempWindow.Visible Then ' continue processing End If Maybe an examination of a dumposm straight after bootup would reveal what sets are loaded. To me it would seem a little pointless to load settings for a window before it first gets focus and surely a window can only get focus if its visible. Of course there is the possibility of a window being temporarily hidden. Hmm...I'm glad I'm not a screen reader programmer <grin>. Darren On 01/02/2009, Stephen Clower <[email protected]> wrote: > Greetings, > > I am trying to find a way to obtain a list of all active set files in > one of my scripts. Since there is no direct method for accomplishing > this, I'm wondering if the following is dependable: > > ' Retrieve a list of running application windows: > Dim oDesktop : Set oDesktop = DesktopWindow > dim oActiveApps : Set oActiveApps = oDesktop.DirectChildren > Dim appCount : appCount = oActiveApps.Count > > ' Loop through them > Dim i > Dim oTempWindow, oTempSet > For i = 1 To appCount > Set oTempWindow = oActiveApps.Item(i) > Set oTempSet = oTempWindow.ActiveSettings > '... Do stuff with the set... > Next > > > Any thoughts? > > Steve > >
