Category: Windows
Title: Restart the own program
Date added: 15.03.2006
Hits: 3654


procedure TForm1.Button1Click(Sender: TObject);
var
  FullProgPath: PChar;
begin
  FullProgPath := PChar(Application.ExeName);
  WinExec(FullProgPath, SW_SHOW);
  Application.Terminate;
end;

1. How to format date and time using the format given by a Format? (2689 Hits)

2. How to confine the mouse? (1753 Hits)

3. How to paste or copy the content of Tmemo? (1644 Hits)

4. How to install a keyboard hook? (15314 Hits)

5. How to trap mouse events outside of my application? (6443 Hits)

For any problems or recommendations about Delphi Tricks site, please

feel free to contact us on that e-mail: support@delphitricks.com.
If you want to advertise on the site use that e-mail: advertise@delphitricks.com.

You can freely use or modify these Delphi source codes for non-commercial use. We are not responsible of any damages that can be caused by the utilisation of that source codes.