Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Programm beenden und neu starten (https://www.delphipraxis.net/107286-programm-beenden-und-neu-starten.html)

msickel 25. Jan 2008 09:23


Programm beenden und neu starten
 
Hallo

gibt es eine Möglichkeit ein Programm zu beenden und anschliessend wegen einer
Konfigänderung neu zu starten das die geänderte Konfig neu eingelesen wird zum Beispiel ?

Martin

SirThornberry 25. Jan 2008 09:26

Re: Programm beenden und neu starten
 
du könntest das Programm einfach per ShellExecute nochmal starten und sich dann schließen:
Delphi-Quellcode:
ShellExecute(0, 'open', PChar(ParamStr(0)), nil, nil, sw_show);
close;
Oder was ich für sinnvoller erachte wenn du Objectorientiert gearbeitet hast: Gebe das Object frei und instanziere es neu.

DeddyH 25. Jan 2008 09:27

Re: Programm beenden und neu starten
 
Delphi-Quellcode:
uses ShellAPI;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  if MessageBox(Handle,'Neu starten?','Bestätigen',MB_YESNO) = idYes then
    ShellExecute(Handle,'open',PChar(ParamStr(0)),nil,nil,SW_SHOWDEFAULT);
end;
[edit] Zu spät :? [/edit]


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:04 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz