黑 黑鹰船长 Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-18 #1 各位大虾： 你们好！ 我最近遇到一个问题,要求程序自己能删除自己，不知该技术怎么实现 特来向各位请教。 湖南的DELPHI爱好者 2004/1/18
S sstone Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-18 #2 给的分太少了 var F:TextFile; begin AssignFile(F,'delself.bat'); Rewrite(F);{F为TextFile类型} WriteLn(F,'del '+ExtractFileName(Application.ExeName)); WriteLn(F,'del %0'); CloseFile(F); WinExec('delself.bat',SW_HIDE); end;
给的分太少了 var F:TextFile; begin AssignFile(F,'delself.bat'); Rewrite(F);{F为TextFile类型} WriteLn(F,'del '+ExtractFileName(Application.ExeName)); WriteLn(F,'del %0'); CloseFile(F); WinExec('delself.bat',SW_HIDE); end;
黑 黑鹰船长 Unregistered / Unconfirmed GUEST, unregistred user! 2004-01-18 #3 我的程序是通过加密的,在解密后生成一个非".exe"文件,然后再执行该非'.exe'文件 在运行完成后,我希望程序自己删除解密出来的中间文件。
