|
Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.619 Beiträge
Delphi 12 Athens
|
Re: deletefile und Konsorten
13. Nov 2009, 16:42
Du tust doch IMO bereits jetzt mehr als notwendig. Was ich meinte:
Delphi-Quellcode:
//GetFileAttributesEX(Dateiname,GetFileExInfoStandard, @DateiInfo);
if Dateidatumzulassig(DateiInfo) then begin
// if (DateiInfo.dwFileAttributes and FILE_ATTRIBUTE_HIDDEN) >0 then
if Setfileattributes(Dateiname,FILE_ATTRIBUTE_NORMAL) then
Deletefile(Dateiname);
end;
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|