eigene Anwendung und/oder Windows neustarten

[axelf98]

Hallo,
ich schreibe gerade ein Serverprogramm, dass sich auch selber neustarten können soll, genauso wie Windows aus der Ferne rebooten soll. Wie kann man das am geschicktesten umsetzen?

[arbu man]

Es könnte Sinnvoll sein einen 2ten Server zum Neustarten zu erstellen um deinen Server auch Neustarten zu können wenn er abgestürzt ist. Natürlich musst du auch prüfen ob der User die Rechte zum Neustart hat.

mfg, Björn

[turboPASCAL]

Der Service started einen Service der den Service nach X Secunden neu started. :mrgreen:

[SirThornberry]

ist es denn wirklich notwendig das dein Programm geschlossen und neu gestartet wird? Genügt es nicht wenn du im Programm alles frei gibst und neu erstellst?

[axelf98]

Zitat:

Zitat von SirThornberry

ist es denn wirklich notwendig das dein Programm geschlossen und neu gestartet wird? Genügt es nicht wenn du im Programm alles frei gibst und neu erstellst?

Der Server ist nur für mein Programm zuständig. Sollte es mal Probleme geben, sollte man einfach robooten können, weil dann niemand mehr an den Server gehen soll. Der hat auch keinen Monitor.
Natürlich soll das dann vom Clienten aus geschehen, aber es geht mir ja nur um die Routinen.

[Olli]

Matti's Lösung gefällt mir am besten, denn das würde es ermöglichen, daß der Service (Zusammenhang: Service <-> Server) neu gestartet wird. Und zur Not eben einen Watchdog-Service dessen Sinn und Zweck es ist den Hauptservice neuzustarten.

[axelf98]

Zum Neustarten wirds wohl ein ShellExec-Aufruf mit

C:\Windows\System32\Shutdown.exe -r -t 01

werden. Bedeutung: Neustarten in einer Sekunde und alle Prozesse werden gekillt.

[Olli]

Wobei man das in einer Schleife so schön machen könnte ... naja:

http://www.delphipraxis.net/internal...ect.php?t=6983

[axelf98]

Und die eigene Anwendung neustarten klappt so ganz gut:

Delphi-Quellcode:

procedure ProgrammRestart;
begin
     ShellExecute( 0, 'Open', pchar(Application.Exename),'' ,pChar(programmpfad),SW_SHOW);
     Application.Terminate;
end;

[Luckie]

@Axel: Wir reden hier von einem Service, keiner normalen Anwendung. Und deine Lösung, um Windows neuzustarten ist auch nicht die beste. Besser wäre die entsprechende API-Funktion zu nutzen: ExitWindowsEx.