Registriert seit: 24. Feb 2003
Ort: Graz (A)
705 Beiträge
Delphi 7 Enterprise
|
Re: Überflüssige Dateien finden und löschen
25. Okt 2003, 15:52
Hallo,
ich habe mir Deinen Code nur mal auf die Schnelle angeschaut,
LoeschListe:=TStringList.Create;
wird nie mehr Freigegeben (LoeschListe.Free).
Damit Dein Programm auf Usereingaben besser reagiert, würde ich Dir
empfehlen, die Procedure SucheDateien in einen Thread auszulagern.
Armin P. Pressler
BEGIN
...real programmers are using C/C++ - smart developers Delphi;
END;
|