如何重启DELPHI自身的应用程序，比如用一个按钮实现，能有程序最好

Question

如何重启DELPHI自身的应用程序，比如用一个按钮实现，能有程序最好，谢谢！

Answer 1

直接杀掉delphi32的进行，然后再用winexec函数启动delphi 

Answer 2

program project1;
  uses windows;
  FormMain FormMain.pas' {frmMain};{$R *.res}
begin
  Application.Initialize;
  Application.CreateForm(TfrmMain, frmMain);
  Application.Run;
  if ReStart then
  begin
    WinExec(PChar(Application.ExeName) ,SW_SHOWNORMAL  );
  end;
end;procedure TFrmMain.btn1Click(Sender: TObject);
begin
  ReStart := True;//全局变量
  Close;
end;