Kein TForm, Application.Terminated geht nicht!

[Dax]

Delphi-Quellcode:

begin
  Application.Initialize;
  Application.Run;

  while not Application.Terminated do Application.ProcessMessages;
  // Commented
end.

Commented: Diese Zeile bewirkt, das die Messageloop des Programms nie verlassen wird. Nimm es raus, und dein Programm sollte wieder Ordnungsgemäß schließen.