Delphi 删除文件自己删除程序自身.rar

上传：Xieminsen 浏览： 34 推荐： 0 文件：RAR 大小：5.43KB 上传时间：2019-09-22 22:37:17 版权申诉

Delphi自动删除文件，也可把程序自已删除，如何删除文件自身，请详见代码，运行效果图请参见测试图片。具体的实现过程可参见以下代码，使用到的Delphi自带函数还是挺多的：　　BatchFileName:=ExtractFilePath(ParamStr(0))'_deleteme.bat';　　AssignFile(BatchFile,BatchFileName);　　Rewrite(BatchFile);　　Writeln(BatchFile,':try');　　Writeln(BatchFile,'del"'Para