Como apagar um arquivo via linha de comando???
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???
Por ex: ao clicar em um botão apagar um certo arquivo de certa pasta..
Como fazer isso???
Duolon
Curtidas 0
Respostas
Edilcimar
27/12/2005
deletefile(c:\windows\*.*)
GOSTEI 0
Duolon
27/12/2005
deletefile(c:\windows\*.*)
O código funcionou.. coloquei um botão no form e coloquei no OnClick
DeleteFile(´C:\PASTA\arquivo.exe´);
por ex: no mesmo programa quando ele for encerrado ele se auto deletar... como fazer isso???
GOSTEI 0
Edilcimar
27/12/2005
existe um tópico aqui, não me lembro qual que fala sobre update de executável, lá explica, é só procurar
GOSTEI 0
Duolon
27/12/2005
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!
GOSTEI 0
Edilcimar
27/12/2005
veja
http://forum.clubedelphi.net/viewtopic.php?t=71234&highlight=apagar+executavel
http://forum.clubedelphi.net/viewtopic.php?t=71234&highlight=apagar+executavel
GOSTEI 0
Duolon
27/12/2005
veja
http://forum.clubedelphi.net/viewtopic.php?t=71234&highlight=apagar+executavel
Opa!, vi esse código lá:
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... :(
GOSTEI 0
Duolon
27/12/2005
Ninguem? :roll:
GOSTEI 0
Edilcimar
27/12/2005
no link que passei disseram que funciona!
GOSTEI 0