Einzelnen Beitrag anzeigen

Benutzerbild von scrat1979
scrat1979

Registriert seit: 12. Jan 2007
Ort: Sulzbach a.d. Murr
1.028 Beiträge
 
Delphi 10.4 Sydney
 
#5

Re: Alle Ordner eines Verzeichnises in einer Listbox auflist

  Alt 3. Apr 2007, 09:58
Hallo,

ich habe mir vor kurzen eine kleine Komponente erstellt, mit welcher man genau das hinbekommen sollte Leider habe ich sie (noch) nicht kommentiert, vielleicht wirst Du ja aus dem Source schlau...

Schnellanleitung der Grundfunktion:

1.) Komponente installieren und auf Form platzieren
2.) Einstellungen im OI vornehmen (Für "nur" Verzeichniss sollte es folgendermaßen aussehen:
faAnyFile = true, faDirsOnly = true.
3.) Untervereichnisse einschliessen? -> im OI aktivieren

Aufruf:

Listbox1.Items := AdvFileSearch1.SearchToList; Ist evtl. mit Kanonen auf Spatzen geschossen, aber Du kannst Dir ja mal die Kernroutine anschauen und entsprechen anpassen.

Vielleicht hilft es Dir ja weiter...

SCRaT
Angehängte Dateien
Dateityp: pas advfilesearch_121.pas (13,1 KB, 26x aufgerufen)
Michael Kübler
  Mit Zitat antworten Zitat