Wer kennt das nicht: man möchte in einer DirectoryListbox auch SystemOrdner anzeigen lassen aber es geht nicht? Kein Problem:
Man öffne die Datei „FileCtrl.pas“ im ordner „\delphi3\source\vcl“ (falls man die Quelltexte mitinstalliert hat).
Man suche dir function „TDirectoryListbox.ReadDirectoryNames“ und füge in die Zeile „Status := […] ‚*.*‘), faDirectory, SearchRec)“ an faDirectory noch „or fasysfile“ hinzu. Jetzt nur noch die Unit neu compilieren und die Systemordner in der Listbox geniessen.
MFG, Volker