Como Excluir No Delphi
2
Como excluir (remover, deletar) um arquivo usando Delphi Em algumas situações nossas aplicações precisam excluir arquivos. Para isso o Delphi nos fornece a função DeleteFile(), presente na unit SysUtils. Esta função recebe o caminho e nome do arquivo a ser excluído e retorna true se a exclusão foi feita com sucesso e false em caso contrário. Veja um trecho de código no qual excluímos um arquivo chamado "dados.txt": procedure TForm1.Button1Click(Sender: TObject); var arquivo: string; begin // diretorio e nome do arquivo arquivo := 'C:\arquivo de codigos\dados.txt'; // vamos remover o arquivo if DeleteFile(arquivo) then ShowMessage('O arquivo foi excluído com sucesso') else ShowMessage('Não foi possível excluir o arquivo'); end; Para fins de compatibilidade, esta dica foi escrita usando Delphi 2009
-
Upload
elizabeth-oliveira -
Category
Documents
-
view
40 -
download
0
Transcript of Como Excluir No Delphi
5/14/2018 Como Excluir No Delphi - slidepdf.com
http://slidepdf.com/reader/full/como-excluir-no-delphi 1/2
Como excluir (remover, deletar) um arquivo usando Delphi
Em algumas situações nossas aplicações precisam excluir arquivos. Para isso o Delphi nos fornecea função DeleteFile(), presente na unit SysUtils. Esta função recebe o caminho e nome do arquivoa ser excluído e retorna true se a exclusão foi feita com sucesso e false em caso contrário.
Veja um trecho de código no qual excluímos um arquivo chamado "dados.txt":
procedure TForm1.Button1Click(Sender: TObject);
var
arquivo: string;
begin
// diretorio e nome do arquivo
arquivo := 'C:\arquivo de codigos\dados.txt';
// vamos remover o arquivo
if DeleteFile(arquivo) then
ShowMessage('O arquivo foi excluído com sucesso')
else
ShowMessage('Não foi possível excluir o arquivo');end;
Para fins de compatibilidade, esta dica foi escrita usando Delphi 2009
5/14/2018 Como Excluir No Delphi - slidepdf.com
http://slidepdf.com/reader/full/como-excluir-no-delphi 2/2
