mit close das Programm beenden, und per ShellExecute neustarten (mit der Suche hättest du das aber auch gefunden

)
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Close;
ShellExecute(Application.Handle, 'open', Pchar(ParamStr(0)), nil, nil, sw_SHOWNORMAL);
end;
Mfg