-
Как перехватить такие события, как нажатие или отпускание кнопок мыши и перемещение курсора, вне своей программы?
-
Нашел вот такой код:
unit Unit1;
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs,Wintypes,Winprocs, StdCtrls, AppEvnts;
type TForm1 = class(TForm) private { Private declarations } public { Public declarations } end; function SetHook:Boolean; function UnHookHook:Boolean; function HookProc(Code:integer; wParam: Word; lParam: Longint): Longint;
var Form1: TForm1; HookedAlready:Boolean; ourHook:HHook;
implementation
{$R *.dfm}
function SetHook:Boolean; begin if HookedAlready then exit; ourHook:=SetWindowsHookEx(WH_MOUSE,HookProc,HInstance,0); (*В ПРЕДЫДУЩЕЙ СТРОКЕ ВЫДАЕТ ОШИБКУ: incompatible types:"calling сonventions differ"*) HookedAlready:=True; end;
function UnHookHook:Boolean; begin UnHookWindowsHookEx(ourHook); HookedAlready:=False; end;
-
Hooks - Хуки
-
что - хуки?
-
TIF, можно ли поподробнее или хотя бы разъясни на том примере, что я дал
-
-
спасибо - буду читать. Но все равно посмотри, пожалуйста, почему там возникает ошибка в [1]?
-
-
> Нашел вот такой код
Выкинь его, он принципиально не решает поставленной задачи, кр.того в этом виде попросту не будет работать.
Следует ставить хук WH_MOUSE_LL.
|