Nachrichtenschleife wird nicht beendet

[sirius]

Zitat von sx2008:

Mal abgesehen davon, dass die Nachrichtenschleife in deinem Beispiel keinen Sinn macht, hast du vergessen, auf WM_QUIT zu reagieren:

Delphi-Quellcode:

while GetMessage(Msg, 0, 0, 0) do
begin
  if Msg.Message = WM_QUIT then break;
  TranslateMessage(Msg);
  DispatchMessage(Msg);
end;

Was glaubst du, bei welcher Nachricht getMessage false zurückgibt? (Antwort: WM_Quit)


Edit: @Ferby: Du warst prinzipiell auf dem richtigen Weg. Nur VCL und nonVCL zu mischen ist sehr schwierig und eher nicht zu empfehlen.