Findfirst,Findnext schulung

[SirThornberry]

FindFirst heißt ja übersetzt schon FindeErstes
FindNext heißt dann FindeNächstes
und Mit FindClose schließt man das gesuche hab.

Rufst du also FindFirst auf wird die Suche eingeleidet und das Ergebnis wird in dem übergebenen TSearchRec gespeichert.
Gibt FindFirst dir 0 zurück heißt es das mindestens einwas gefunden wurde (die suche also erfoglreich eingeleidet wurde.
Ist dies der Fall sollte man die Suche auch mit FindClose wieder schließen

Delphi-Quellcode:

if (FindFirst(....) = 0) then
begin
  FindClose(...);
end;

FindFirst gibt dir aber wie gesagt nur das erste zurück. Um an die anderen Ergebnisse der Suche zu kommen musst du FindNext aufrufen bis dir FindNext einen Wert ungleich 0 zurück gibt

Delphi-Quellcode:

if (FindFirst(....) = 0) then
begin
  repeat
    //hier kann der Datei-/Ordnername aus der TSearchRec-Struktur ausgelesen werden
  until FindNext(...) <> 0;
  FindClose(...);
end;