Probleme auf neuem Rechner

[Rawsche]

Hallo zusammen,
ich habe mir vor kurzen einen neuen PC gekauft.
Alter PC: Windows 10 Home
Neuer PC: Windows 10 Pro

Ich programmiere nun also auf dem neuen PC und arbeite weiter an einem Programm, was bereits auf dem alten PC fehlerfrei lief.
Nun ergibt sich aber auf dem neuen PC ein mir völlig unversätndliches Problem.

Mein Programm soll sich unter gewissen Umständen neu starten lassen. Dafür verwendete ich bisher immer folgenden Code:

Code:

form1.close;
ShellExecute(Handle, 'open',PChar(Application.ExeName), nil, nil, 0);

Wenn ich nun aber einen Neustart durchführen will, dann passiert (nur auf meinem neuen PC, trotz des selben Codes) einfach nichts. Keine Fehlermeldung, keine Reaktion, einfach überhaupt nichts. Auf meinem alten Rechner funktioniert der Neustart immer noch problemlos.

Kann mir einer von euch erklären, wie das passieren kann? Wie kann ich das Problem beheben?

Vielen Dank und LG

[DieDolly]

Ich denke das ist pures Glück, dass es auf dem alten PC funktioniert.
Der neue macht meiner Meinung nach genau das was zu erwarten ist.

Du sagst deinem Programm es soll sich schließen und erst danach ruft es sich selber wieder auf.
Pures Glück wenn das mal klappt.

Einen Neustart realisiert man am besten anders aber nicht so.

[Klaus01]

.. mormalerweise hat man für diese Art von Problemen einen Watcher Prozess.
Dieser überwacht das Programm und startet es bei Bedarf wieder neu.

Grüße
Klaus

[DieDolly]

Oder man ruft ShellExecute im FormDestroy auf. So spät wie möglich.

[peterbelow]

Zitat von Rawsche:

Hallo zusammen,
ich habe mir vor kurzen einen neuen PC gekauft.
Alter PC: Windows 10 Home
Neuer PC: Windows 10 Pro

Ich programmiere nun also auf dem neuen PC und arbeite weiter an einem Programm, was bereits auf dem alten PC fehlerfrei lief.
Nun ergibt sich aber auf dem neuen PC ein mir völlig unversätndliches Problem.

Mein Programm soll sich unter gewissen Umständen neu starten lassen. Dafür verwendete ich bisher immer folgenden Code:

Code:

form1.close;
ShellExecute(Handle, 'open',PChar(Application.ExeName), nil, nil, 0);

Wenn ich nun aber einen Neustart durchführen will, dann passiert (nur auf meinem neuen PC, trotz des selben Codes) einfach nichts. Keine Fehlermeldung, keine Reaktion, einfach überhaupt nichts. Auf meinem alten Rechner funktioniert der Neustart immer noch problemlos.

Kann mir einer von euch erklären, wie das passieren kann? Wie kann ich das Problem beheben?

Vielen Dank und LG

Prüfe den Rückgabewert von ShellExecute!

[Luckie]

Zitat von peterbelow:

Prüfe den Rückgabewert von ShellExecute!

Das wird er nicht mehr können, da der aufrufende Prozess beendet wurde.

Aber das was du da machst, ist in etwa so, also ob du erst dich erschießt und danach die Geisel erschießen willst. Ok, das war jetzt etwas makaber.

Davon abgesehen lässt sich so ein Programm nie sauber beenden, wenn es keine andere Möglichkeit gibt es zu beenden.

[jsp]

Le roi est mort, vive le roi

Sorry, es ist einfach zu heiss

[Rawsche]

Danke erstmal für eure Rückmeldung. Ich verstehe, dass ihr nicht zufrieden seid mit meiner Art den Neustart herbeizuführen. Ich werde mich da sicherlich auch nochmal intensiver mit beschäftigen. Mein Problem bleibt aber auch so bestehen:

Ich habe mal versucht ein anderes Programm per ShellExecute einfach aufzurufen ohne mein Programm zu schließen. Das sah so aus:

Code:

ShellExecute(Handle, 'open', PChar('C:\Datei.exe'), Nil, Nil, 1);

Die ausgewählte Datei funktionierte einwandfrei und lag auch am richtigen Ort mit dem richtigen Namen. Trotzdem passierte wieder nichts Sichtbares...

Vielleicht mache ich irgendetwas grundlegend falsch?!

[DieDolly]

Zitat:

Danke erstmal für eure Rückmeldung. Ich verstehe, dass ihr nicht zufrieden seid mit meiner Art den Neustart herbeizuführen. Ich werde mich da sicherlich auch nochmal intensiver mit beschäftigen

Setz das Shellexecute ins FormDestroy und dann sollte alles funktionieren.