Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: Dateien endgültig löschen

  Alt 10. Feb 2007, 10:33
Herzlich willkommen in der Delphi-PRAXiS, Mark.

Du musst damit rechnen, dass dein OpenDialog vom Benutzer abgebrochen wird - ein Löschen muss dann unterbleiben. Auch musst du den Namen der Datei übernehmen, damit du sie löschen kannst:

Delphi-Quellcode:
begin
  with OpenDialog do
    if Execute then
    begin
      DeleteFileDuringNextSystemBoot(FileName);
      messagebox(FoFkicker.Handle, 'You must restart Windows! ', 'INFO', 0);
    end;
end;
Freundliche Grüße vom marabu
  Mit Zitat antworten Zitat