[DELPHI] APAGAR ARQUIVO OU PASTA VIA PROGRAMAÇÃO

//uses Windows

procedure TForm1.Button1Click(Sender: TObject); 

begin

  { Deletar arquivos }

  DeleteFile('D:\teste.html');

end;

procedure TForm1.Button2Click(Sender: TObject); 

begin

  { Apagar Pastas / Diretórios }

  RemoveDirectory('D:\Nova pasta (3)');

end;

Gostou? Deixe seu comentário... Convido você a seguir meu blog, sua presença é bem vinda!【ツ】