Dann baust du eine Messageschleife:
Delphi-Quellcode:
while getmessage(msg,0,0,0) do //msg von Typ TMsg
dispatchmessage(msg);
Achte darauf, dass du die Methode Terminate redefinierst und darin Postthreadmessage mit WM_Quit sendest.
Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.