Probs mit TString und Treeview

[Daniel]

Hallo,

also - die Prozedur ist wie folgt deklariert:

Delphi-Quellcode:

procedure GetFiles(const Directory: string; var Files: TStrings;
  const FileMask: string = '*.*';  const SubFolders: Boolean = False);

Du übergibst also erst das Startverzeichnis als String (z.B. 'C:\'), dann ein Objekt, welches von TStrings abgeleitet ist (z.B. TStringList), dann optional die Dateimaske (z.B. '*.jpg') und zu guter Letzt noch ein Flag, ob Unterverzeichnisse berücksichtigt werden sollen oder nicht (z.B. TRUE).

Angenommen, Du hast ein Memo-Feld auf Deinem Formular und dieses trägt den Namen 'Memo1'. Dann könntest Du in der onClick-Prozedur Deines Buttons etwa folgendes schreiben:
GetFiles('C:\', Memo1.Lines, '*.jpg', TRUE); Dann würde das Ergebnis dieser Suche in das MemoFeld eingetragen werden.