"Fensterfoto" unter Windows 7 klappt nicht so recht...

[turboPASCAL]

So:

Delphi-Quellcode:

if (hNotifierWnd <> 0) and (isWindowVisible(hNotifierWnd)) then
  begin
    hInetExpWnd := FindWindowByClasses(...);
    if hInetExpWnd <> 0 then
    begin
      GetClientRect(hInetExpWnd, cwcr);

      hINSWndDC := GetDC(hInetExpWnd);
      if hINSWndDC <> 0 then
      begin
        with cwcr do
          stretchblt(hBmpDC, 0, 37, clWndWidth, clWndHeight - 37, hINSWndDC, 0, 0, Right - Left,
            Bottom - Top, SRCCOPY);
        
        // ...
      end;
      ReleaseDC(hInetExpWnd, hINSWndDC);
    end;
  end;