Danke, funktioniert aber leider nicht! S. angehängtes Projekt.
Zitat von
3_of_8:
Du gehst auf Projekt/Quellcode anzeigen.
Dann steht da irgendwo
Delphi-Quellcode:
begin
Application.Initialize;
...
Application.Run;
end.
Ersetzen durch:
Delphi-Quellcode:
var Terminate: Boolean;
begin
repeat
Teminate:=True;
Application.Initialize;
...
Application.Run;
until Terminate;
end.
Wenn du das Programm neustarten musst, ruf einfach an der betreffenden Stelle auf:
(Ungetestet)