Fullscreen anderer Programme abfragen/erkennen

**c20c**

Hallo liebe DPler,

ich versuche mich gerade an einer Methode, die herausfinden soll, ob andere Programme im Moment im Fullscreen-Modus laufen.

Sinn der Geschichte: Ich benutze in einem Programm regelmäßig (Timer) BringtoFront, jedoch ist das doof, wenn man sich gerade einen Film im Vollbildmodus anschaut, weil sich das Fenster richtigerweise vor den Film drängt.

Mein bisheriger Ansatz ist:

-EnumWindows
-GetWindowPlacement / GetWindowRect

Nun würde ich das gerne mit Screen.Width/Screen.Height vergleichen, aber da kommt bei einer >= Abfrage nichts Gescheites bei raus. (In beiden Fällen)

Hier mal mein SRC:

markieren

Delphi-Quellcode:

			function AnyFullscreenWindows: Boolean;

var

  AnyMaximized: Boolean;

begin

AnyMaximized:=false;

EnumWindows(@EnumWindowCallback, integer(@AnyMaximized));

result:=AnyMaximized;

end;

Variante1

zusammenfalten · markieren

Delphi-Quellcode:

			function CompareRectSize(first, second: trect): real; stdcall;

// Result= Verhaeltnis

begin

result:= ((second.Right-second.Left)*

          (second.Bottom-second.Top)) /

         ((first.Right-first.Left)*

          (first.Bottom-first.Top));

end;

function EnumWindowCallback(hwnd:HWND; lParam: pBoolean): Boolean; stdcall;

var

  ScreenRect,WindowRect: tRect;

begin

  ScreenRect.Left:=0;

  ScreenRect.Top:=0;

  ScreenRect.Right:=Screen.Width;

  ScreenRect.Bottom:=Screen.Height;

  GetWindowRect(HWND,WindowRect);

  lParam^:= (lParam^) or (CompareRectSize(ScreenRect,WindowRect)>=1);

  Result:=true;

end;

Variante2

zusammenfalten · markieren

Delphi-Quellcode:

			function GetWindowState(Wnd: HWnd): Boolean; stdcall;

var WPlacement : PWINDOWPLACEMENT;

begin

  GetMem(WPlacement,SizeOf(TWINDOWPLACEMENT));

  WPlacement^.Length:=SizeOf(TWINDOWPLACEMENT);

  if GetWindowPlacement(Wnd,WPlacement) then

    if  (Wplacement^.rcNormalPosition.Left<=0) and

        (Wplacement^.rcNormalPosition.Top<=0) and

        (screen.Width<=Wplacement^.rcNormalPosition.Right) and

        (screen.Height<=Wplacement^.rcNormalPosition.Bottom)

    then result:=true

    else result:=false

  else

    Result:=false;

  FreeMem(WPlacement);

end;

function EnumWindowCallback(hwnd:HWND; lParam: pBoolean): Boolean; stdcall;

var

  ScreenRect,WindowRect: tRect;

begin

  lParam^:= (lParam^) or (GetWindowState(HWND));

  Result:=true;

end;[/

Ich tippe auf einen Denkfehler meinerseits, aber ich komme einfach nicht drauf. HILFE!

Vielen Dank im Vorraus

c20c

Fullscreen anderer Programme abfragen/erkennen

Fullscreen anderer Programme abfragen/erkennen

Forumregeln