Ahja klar, aber an alle: SearchTool ist besser. Danke.
Edit:
Dein IsDirectory funktioniert nicht, denn es liefert immer False zurück. Folgender Code liefert auch immer False, warum ?
Delphi-Quellcode:
function IsDirectory(dir : String) : Boolean;
begin
Result := DirectoryExists(Dir);
end;