Zitat von
Klaus01:
@ste_ett
Zitat von
ste_ett:
Schreingeschützte Dateien können ncith mit DeleteFile() gelöscht werden.
"SetFileAttributes(Pfad, FILE_ATTRIBUTE_NORMAL)" schafft Abhilfe.
Wenn die Datei schreibgeschützt wäre, dann würde auch das Umbenennen nicht funktionieren, oder?
Grüße
Klaus
Klaus hat Recht....habe testhalber den SetFileAttributes-Befehl gesetzt...
Delphi-Quellcode:
if (FileExists(TEMP_VIDEO_LARGE) AND FileExists(TEMP_VIDEO_SMALL)) then begin
SetFileAttributes(TEMP_VIDEO_LARGE, FILE_ATTRIBUTE_NORMAL);
if (not(DeleteFile(TEMP_VIDEO_LARGE))) then
str := IntToStr(GetLastError);
...und da ist er in den IF-Teil reingesprungen...also hat die Datei dennoch ned löschen können!!
Danke trotzdem für die Bemühungen...
LG
Thomas