Array
(
)

Como apagar um arquivo via linha de comando???

Duolon
   - 27 dez 2005

Como apagar um arquivo via linha de comando?

Por ex: ao clicar em um botão apagar um certo arquivo de certa pasta..

Como fazer isso???


Edilcimar
   - 27 dez 2005

deletefile(c:\windows\*.*)


Duolon
   - 27 dez 2005


Citação:
deletefile(c:\windows\*.*)


O código funcionou.. coloquei um botão no form e coloquei no OnClick #Código

DeleteFile(´C:\PASTA\arquivo.exe´);
apagou o arquivo certinho, só que eu queria apagar o proprio arquivo gerado pela compilador quando ele for encerrado como fazer isso?

por ex: no mesmo programa quando ele for encerrado ele se auto deletar... como fazer isso???


Edilcimar
   - 27 dez 2005

existe um tópico aqui, não me lembro qual que fala sobre update de executável, lá explica, é só procurar


Duolon
   - 27 dez 2005


Citação:
existe um tópico aqui, não me lembro qual que fala sobre update de executável, lá explica, é só procurar


Antes de ter postado dei uma procurada, mais ñ axei nada a respeito, se alguem souber como q faz posta ae!


Edilcimar
   - 27 dez 2005

veja
http://forum.clubedelphi.net/viewtopic.php?t=71234&highlight=apagar+executavel


Duolon
   - 27 dez 2005


Citação:
veja
http://forum.clubedelphi.net/viewtopic.php?t=71234&highlight=apagar+executavel


Opa!, vi esse código lá:

#Código

procedure DeletaExe; 

procedure TfrmPrincipal.DeletaExe;
Var Arquivo: TextFile;
begin
AssignFile(Arquivo,ChangeFileExt(ParamStr(0),´.bat´));
ReWrite(Arquivo);
WriteLn(Arquivo,´:1´);
WriteLn(Arquivo,Format(´Erase "¬s"´,[ParamStr(0)]));
WriteLn(Arquivo,Format(´If exist "¬s" Goto 1´,[ParamStr(0)]));
WriteLn(Arquivo,Format(´Erase "¬s"´,[ChangeFileExt(ParamStr(0),´.bat´)]));
CloseFile(Arquivo);
WinExec(PChar(ChangeFileExt(ParamStr(0),´.bat´)),sw_hide);
Halt;
end;


só que o programa ñ se auto deletou... :(


Duolon
   - 28 dez 2005

Ninguem? :roll:


Edilcimar
   - 28 dez 2005

no link que passei disseram que funciona!