怎样在程序自己捕获到错误后自动关闭程序重新打开？

Question

等于重启程序一次

Answer 1

加个TApplicationEvents控件，里面有OnException事件的！

Answer 2

加个TApplicationEvents控件，里面有OnException事件寫代碼:WINEXEC或者SHELLEXECUTE.

Answer 3

try
  ...
except
  Application.Terminate;
end;

Answer 4

var
  mFileName : string;
begin
mFileName:='程序的目录'
try
  ...
except
  Application.Terminate;
  ShellExecute(application.Handle,Nil,PChar(mFileName),Nil,Nil,SW_SHOWNORMAL);
end;

Answer 5

to:  jinjintalk(西门吹雪) 
请问老兄：Application.Terminate;这个程序都已经结束了，如何去执行后面的程序。
你试过了吗？（肯定不行）