Status von FindAllFiles (Suche beendet?)

[Reinhardtinho]

Hallo zusammen,

ich benutze diese Prozedur FindAllFiles, um die Dateien in einem Ordner rekursiv zu finden.

Ich habe in meinem Programm ein zusätzliches Form, das anzeigt, dass gesucht wird und einen Abbrechen-Button. Wenn dieser gedrückt wird, soll die Suche abgebrochen werden. Das ganze habe ich über Events gesteuert.

Jetzt meine Frage:

Wie kann ich in der Prozedur FindAllFiles abfragen/feststellen, dass sie regulär beendet wurde?

Mir schwebt da so etwas vor:

Delphi-Quellcode:

while not FCancelled and not FFinished then
begin
  ...
  //Inhalt von FindAllFiles
end;

FCancelled wird gesetzt, wenn der Benutzer Abbrechen gedrückt hat.

Wann/Wie/Wo kann ich in FindAllFiles die Variable FFinished füllen, wenn die Rekursion abgeschlossen wird?



Vielen Dank und freundliche Grüße

Lorenz