Message bei Programmaktivierung aus Taskbar

[SirThornberry]

an welcher Stelle versuchst du auf die Message zu reagieren? Versuchst du auf die Message an das Form zu reagieren oder versuchst du auf die Message an die eigentliche Application zu reagieren?

[lbccaleb]

Also ausblenden findest du hier

Ansonnsten könntest du im Aufrufenden Programm einen Boolean einrichten, welcher True ist während du in der Warteschleife hängst.

Und in der Message WM_Activate wertest du diesen wert aus und sorgst dafür, dass das Programm nur wieder aktiviert wird, wenn es nicht mehr in der Schleife hängt.

PS. Das Problem sollte bei dir nicht nur in der Taskbar auftreten, sondern auch wenn das Fenster auf andereweise aktiviert wird z.b. über "Alt + Tab" oder im Taskmanager.

Edit:
Zusätzlich musst du das selbe wohl auch für "WA_CLICKACTIVE" machen.

[hanspeter]

Zitat von SirThornberry:

an welcher Stelle versuchst du auf die Message zu reagieren? Versuchst du auf die Message an das Form zu reagieren oder versuchst du auf die Message an die eigentliche Application zu reagieren?

Bei der Application bzw. bei der Form selbst kommt keine Message an.
In der eigentlichen Warteschleife aus dem oberen Eintrag kommt nur ein wm_paint beim Aktivieren des rufenden Programms.
Entweder bleiben alle anderen Meldungen schon im Delphi hängen oder das Fenster zeichnet sich als einzige Reaktion nur neu.
Den Focus kann es ja nicht bekommen, da es in einer "harten" Warteschleife hängt.

Delphi-Quellcode:

 if ret = (WAIT_OBJECT_0 + 1) then
      begin
          
        while PeekMessage(Msg, 0, WM_PAINT, WM_PAINT, PM_REMOVE) do
        begin
          if msg.Message = wm_Paint then messagebeep(1);  <<<<<<<<<<<<                         
          DispatchMessage(Msg);
      end;

An lbccaleb
Ja das Problem tritt auch bei anderen Aktivierungen auf (Taskmanager, Alt-Tab). Ich wollte nur das Problem nicht unnötig komplizieren.


Gruß
Peter