[nixon232]

юзал только мышь. на 7/10 х64 вполне работает. без длл

Код:

  MouseHook := SetWindowsHookEx(WH_MOUSE_LL, @LowLevelMouseProc, HInstance, 0);

Код:

function LowLevelMouseProc(nCode: Integer; WParam: WParam; LParam: LParam)
  : LRESULT; stdcall;
begin
  if nCode >= 0 then
  begin
   
    case WParam of
      WM_LBUTTONUP:
        begin
   ...
        end;

    end;
  end
...