auf richtigen InputDesktop prüfen (für GetCursorPos)

[VizeTE]

Zitat von Dezipaitor:

...Handles zeigen auf Objekte im Kernelstrukturen (Klassen) von Windows. Damit man sie nicht einfach ändern kann, bekommt man eben eine Nummer (ein Handle), die die Struktur eindeutig in deinem Prozess zuordbar macht. D.h. du kannst beliebige Handles anfordern, die auf dieselbe Struktur im Kernel zeigen...

OK, wieder etwas dazu gelernt. Die Problematik mit Pointern ist mir durchaus bewusst. Ich bin aber davon ausgegangen das es pro Kernelstruktur nur ein Handle gibt und ich somit immer das selbe Handle bekomme wenn ich die selbe Struktur abfrage.

Zitat von Dezipaitor:

Du musst schon den Namen des Desktops deiner Anwendung herausfinden und dann vergleichen

Habe es mit GetUserObjectInformation gelöst. Ist ja ein überschaubarer Aufwand und scheint prima zu funktionieren.

Zitat von Dezipaitor:

...Dass du trotzdem Zugriff auf den Desktop des Bildschirmschoner hast liegt daran, dass der Bildschirmschoner in einem eigenen Desktop (InputDesktop = Screensaver) gestartet wird, der Lesezugriff für den Benutzer zulässt (so kann man erkennen, dass der Bildschirmschoner aktiv ist). Sobald der Bildschirmschoner jedoch beendet wird, ist der Winlogon Desktop aktiv und eine normale Anwendung kann garnichts mehr damit anfangen (GetLastError = 5 = Access Denied).

Der Punkt der mich überrascht hat war das ich auf den Screensaver Lesezugriff habe aber dennoch nicht die Position der Mouse abrufen kann. Das macht zwar inhaltlich nicht viel Sinn aber ich dachte wenn OpenInputDesktop funktioniert sollte auch GetMousePos funktionieren. GetMousePos verursacht dann aber eine Exception. Aber mit der obigen Lösung (Vergleich des Desktopnamen) lässt sich das ja prima abfangen.

Hier nochmal der fertige Code falls Jemand das gleiche Problem hat:

Delphi-Quellcode:

function CheckDesktopIsActive: boolean;
var
  hThreadDT     : HDESK;
  hInputDT      : HDESK;
  iLen          : DWORD;
  pDesktopName  : array[0..255] of char;
  sThreadDTName : string;
  sInputDTName  : string;
begin
  Result    := false;
  hInputDT  := 0;
  hThreadDT := 0;

  try
    //Handles ermitteln
    hThreadDT := GetThreadDesktop(GetCurrentThreadId);
    if hThreadDT = 0 then
      Exit;
    hInputDT := OpenInputDesktop(0, false, 0);
    if hInputDT = 0 then
      Exit;

    //Namen zu den Handles ermitteln
    GetUserObjectInformation(hThreadDT, UOI_NAME, @pDesktopName, 256, iLen);
    SetString(sThreadDTName, pDesktopName, Pred(iLen));

    GetUserObjectInformation(hInputDT, UOI_NAME, @pDesktopName, 256, iLen);
    SetString(sInputDTName, pDesktopName, Pred(iLen));

    //Namen vergleichen
    Result := sThreadDTName = sInputDTName;
  finally
    if hInputDT <> 0 then
      CloseDesktop(hInputDT);
  end;
end;

Vielen Dank für die Erleuchtung