Re: Fehler im Verzeichnis suchen Algo
17. Jul 2004, 17:41
welchen Sinn macht denn deine While-Schleife? Ersetz mal das While durch ein If und probiers damit aus.
und dann ergänze deinen FindPath Aufruf folgendermasen:
Result := FindPath(ToBeFound, BuildFileName(Path, ASearchRec.Name));
Ich habs allerdings nicht ausprobiert ob es geht, aber es sollte.
|