Jak pobrać uchwyt okna nad którym znajduje się kursor

Aby pobrać uchwyt okna nad którym znajduje się kursor, wystarczy skorzystać z funkcji API - WindowFromPoint oraz GetCursorPos. Oto kod dla Win32 oraz dla .NET:

// .NET
uses Windows, System.Text; // <-- potrzebny moduł

var
  P : TPoint;
  H : THandle;
  Buffer : StringBuilder;

begin
{ utworzenie klasy }
  Buffer := StringBuilder.Create(128);
{ pobranie pozycji kursora }
  GetCursorPos(P);
{ pobranie uchwytu okna }
  H := WindowFromPoint(P);
{ dla przykładu - pobranie tekstu okna nad którym znajduje się kursor }
  GetWindowText(H, Buffer, Buffer.Capacity);
  { Buffer.ToString zawiera tekst okna }
  Buffer.Free;
end;

// Win32

uses Windows;

var
  P : TPoint;
  H : THandle;
  Buffer : array[1..128] of Char;

begin
{ pobranie pozycji kursora }
  GetCursorPos(P);
{ pobranie uchwytu okna }
  H := WindowFromPoint(P);
{ dla przykładu - pobranie tekstu okna nad którym znajduje się kursor }
  GetWindowText(H, Buffer, SizeOf(Buffer));
  { Buffer zawiera tekst okna }
end;