[nonVCL] Endlosschleife mit 2 Fenstern

[lbccaleb]

Also ich will die Form nicht disablen, da alle noch nutzbar sein sollen, auch wenn die Child Fenster geöffnet sind.

Aber durch dich hab ich trotzdem endlich die Lösung gefunden.
Die eigentlich auch klar war

Ich muss nachtürlich in der Nachrichtenschleife der Childs auf die WM_CLOSE Message reagieren. Dann funktioniert es wie es soll:

Delphi-Quellcode:

    while GetMessage(msg, 0, 0, 0) do
      begin
        if IsDialogMessage(hTest1Wnd, msg) = FALSE then
          begin
            if Msg.message = WM_CLOSE then Break;
            TranslateMessage(msg);
            DispatchMessage(msg);
          end;
      end;