Folder Referencing

[Fiona Vidal]

Good morning,

I would like to reference folders in the Folders window in sequence without using specific folder names but the order that they appear in the window – is this possible?

Many thanks for your help!

[Fiona Vidal]

Good morning,

I would like to reference folders in the Folders window in sequence without using specific folder names but the order that they appear in the window – is this possible?

Many thanks for your help!

[Bernhard Kantz]

When using the .Objects property of a Folder object with argument fpObjectTypeFolder the sequence of the folder objects in the FPObjects collection should be the same as in the Folder window (not in the Object List window). The following procedure outputs all folders in the root of the active project database.

Public Sub ShowFolders()

    Dim oColl As FpObjects
    Set oColl = ActiveDatabase.RootFolder.Objects(fpObjectTypeFolder)
    
    Dim sRes As String
    Dim oObj As FpObject
    For Each oObj In oColl
        sRes = sRes & oObj.Name & vbCrLf
    Next
    
    MsgBox sRes
    
End Sub

Specifying a string pattern instead of fpObjectTypeFolder can be used to narrow the collection of folders. For example the FPScript string “^Data\\d{3}\\.FLD$” will enumerate all folders (\\.FLD$) whose names start with Data (^Data) followed by three digits (\\d{3}). Note the double backslash because its use as escape character in string literals. More on regular expressions can be found in the Online Help for Objects (property) in the Index.

[Autor]

Beiträge