Hi Marmelade
Falls noch nicht geschehen, Willkommen in der
DP.
Damit nicht gleich wieder so'ne 'obskure' Diskussion losgeht:
Delphi starten, meinetwegen 'neue Anwendung' auswählen und los geht es.
Wir legen in
private-Bereich eine Procedure an, sagen wir mal
FindAllFilesInDirectory(StartPfad : String);
die Procedure-Deklaration kopieren wir in den freien Teil der unter
implementation und dem
end..
Als nächstest brauchen wir ein paar Variablen, also schreiben wir
var und
darunter so etwas wie
SRec : TSearchRec;, dann ein
begin und ein
end;.
Zwischen 'begin' und 'end' kommt dann
FindFirst(StartPfad, '*.*', SRec);.
Damit du selber weiterkommst, würde ich jetzt 'FindFirst' anklicken und mit der rechten Maustaste das
Kontextmenü aufrufen. Anschließend dem Menüpunkt zur Hilfe aufrufen und mir die Erklärung sowie das
Beispiel durchlesen.
Gruß
PS Ist zwar Übertrieben, aber es Hilft Dir vielleicht.
[Edit] Benedikt war wohl schneller mit den Antworten...[/Edit]