Forum: Sonstige Fragen zu Delphi
Delphi
by Hazardos,
8. Apr 2006
Hey genau DAS war der Fehler... !!!!!!
Ein herzliches Dankeschön an alle die sich mit meinem Problem befasst und mir somit weitergeholfen haben!
MfG Jörn
Forum: Sonstige Fragen zu Delphi
Delphi
by Hazardos,
8. Apr 2006
naja.. ist ja das selbe TSearchRec... aber ich probiers mal aus!
Forum: Sonstige Fragen zu Delphi
Delphi
by Hazardos,
8. Apr 2006
procedure tF_Backup.Entfernen (von,nach : String);
var Search : TSearchRec;
begin
von := IncludeTrailingBackslash(von);
nach := IncludeTrailingBackslash(nach);
if FindFirst(nach+'*.*', faAnyFile, Search) = 0 then
repeat
if (not fileexists (von + Search.Name))
and FileExists (nach + Search.Name)
Forum: Sonstige Fragen zu Delphi
Delphi
by Hazardos,
8. Apr 2006
Erstmal danke für den Tip.
Das Löschen an sich ist allerdings nicht das Problem.
Das eigentliche Problem ist, dass die Suchmethode den Zugriff auf die Daten behält, also auch auf die leeren Ordner und das trotz FindClose und darüber hinaus auch bis zum Ende der Programmlaufzeit. Da muss erst der Zugriff aufgehoben werden ehe damit weitergearbeitet werden kann.
Forum: Sonstige Fragen zu Delphi
Delphi
by Hazardos,
8. Apr 2006
Hallo Leute,
um sich nur aufs wesentliche zu fokusieren abstrahiere ich mal mein Problem...
Ich habe ein Verzeichnis mit unterverzeichnissen mit FindFirst nach bestimmten Dateien durchsucht, diese gelöscht und zurück bleibt ein leerer Ordner, der nach der FindFirst-methode nicht mehr gelöscht werden kann ==> E/A-Fehler 32, welcher besagt, dass etwas zugriff auf diesen Ordner hat. Ist...