Einzelnen Beitrag anzeigen

Benutzerbild von edosoft
edosoft

Registriert seit: 27. Okt 2003
Ort: Wehingen
258 Beiträge
 
Turbo Delphi für Win32
 
#1

Kein TForm, Application.Terminated geht nicht!

  Alt 25. Nov 2004, 20:48
Hallo,

Also ich hab hier den source:

Delphi-Quellcode:
begin
  Application.Initialize;
  Application.Run;

  while not Application.Terminated do Application.ProcessMessages;
end.
(Also das nur ma zum Test)

Wenn ich das Programm jetzt mit dem Strg.+Alt+Del. (Win 98!!) beende passiert nix. Nach so ner halben Minute oder so kommt dann halt "Programm konnte nicht beendet werden" und "Programm sofort beenden".

Also ich kann des Programm abschießen aber wenn ichs normal beende (z.b. runterfahren) kommt halt zuerst der fehler " Programm konnte nicht beendet werden..."

Wie kann ich das machen?
Danke!

/edit: Ach ja hatte ich vergessen. Ich hab keine TForm und auch keine Andere Unit eingebunden (Ausser "Forms").
Also das ist dann halt der Auszug aus der Project1.dpr
Dominik Weber
www.edo-soft.com
  Mit Zitat antworten Zitat