----gt; Deletar Arquivo AJUDA É URGENTE!!!

17/03/2003

0

preciso fazer uma coisa:
eu vou digitar o caminho + nome do arquivo em um Edit.

então ao clicar em um Botão, esse arquivo deverá ser deletado do micro, (não poderá nem ir pra lixeira), deve sumir mesmo, sem chance de restauração.

Muito Obrigada

Fabiana. :P


Anonymous

Anonymous

Responder

Posts

17/03/2003

Aroldo Zanela

[quote:7b7cabd248=´Fabiana Gimenez´]preciso fazer uma coisa:
eu vou digitar o caminho + nome do arquivo em um Edit.

então ao clicar em um Botão, esse arquivo deverá ser deletado do micro, (não poderá nem ir pra lixeira), deve sumir mesmo, sem chance de restauração.

Muito Obrigada

Fabiana. :P[/quote:7b7cabd248]

The following code prompts for confirmation before deleting a file:

if FileExists(FileName) then

if MessageDlg(´Do you really want to delete ´ + ExtractFileName(FileName) + ´?´), mtConfirmation, [mbYes, mbNo], 0, mbNo) = IDYes then
DeleteFile(FileName);


Responder

17/03/2003

Aroldo Zanela

[quote:288509cad4=´Aroldo Zanela´][quote:288509cad4=´Fabiana Gimenez´]preciso fazer uma coisa:
eu vou digitar o caminho + nome do arquivo em um Edit.

então ao clicar em um Botão, esse arquivo deverá ser deletado do micro, (não poderá nem ir pra lixeira), deve sumir mesmo, sem chance de restauração.

Muito Obrigada

Fabiana. :P[/quote:288509cad4]

The following code prompts for confirmation before deleting a file:

if FileExists(FileName) then

if MessageDlg(´Do you really want to delete ´ + ExtractFileName(FileName) + ´?´), mtConfirmation, [mbYes, mbNo], 0, mbNo) = IDYes then
DeleteFile(FileName);[/quote:288509cad4]

Não se pode confiar nem no help do Delphi7. Corrigindo:

var filename: String;
begin
filename := ´C:\auto.bat´;
if FileExists(FileName) then

if MessageDlg(´Do you really want to delete ´ + ExtractFileName(FileName) + ´?´, mtConfirmation, [mbYes, mbNo], 0) = IDYes then
DeleteFile(FileName);

end;



Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar