delphi覆盖正在运行的执行程序.重启以后可以执行正确的覆盖后的执行程序

Question

delphi覆盖正在运行的执行程序.重启以后可以执行正确的覆盖后的执行程序
希望给个例子。应该也就几行代码吧。谢谢。测试过了就结

Answer 1

MoveFileEx的参数可以设置重启后覆盖

Answer 2

需要以下几步：Handle:=Findwindow('','my captioon');  //获得目标句柄
if Handle>0 then
  CloseHandle(Handle);  //先关闭目标程序
  //有些程序可能无法关闭，这时要用TerminateProcess
ShellExecute(self.Handle,'open',mytest.exe',nil,nil,SW_ShowNormal); //重新执行程序

Answer 3

MoveFileEx完全可行，设置参数为MOVEFILE_DELAY_UNTIL_REBOOT 就行了，下次重启就会替换程序，然后你就shellexcute即可

Answer 4

我以前是这么处理的 
    正在执行的Exe文件我把它改名。 然后把要复制的文件改成它的名字就可以了！