Array
(
)

Como excluir um programa e deixa-lo rodando na memoria?

Marcao
   - 14 set 2004

Boa tarde,


Gostaria de saber se tem como instalar um programa (.exe) no hd e logo apos deletar o .exe, mas que ele continue rodando na memoria, até o computador ser desligado?

Se voce poder me ajudar, agradeço.

[]´s Macos.


Rômulo Barros
   - 14 set 2004

Segue:
http://delphiforum.icft.com.br/forum/viewtopic.php?t=17446&highlight=autodeletar
:wink: :wink: :wink: :wink: :wink:


Reginaldo174
   - 14 set 2004


Citação:


apos deletar o .exe, mas que ele continue rodando na memoria, até o computador ser desligado?

[]´s Macos.


Não sei se vai ficar na memoria depois de deletado pois nunca verifiquei, mas a procedure que utilizo é esta :

procedure TForm1.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;