Hej mam maly problem jak moge przechwycic podwojne klikniecie w dowolnym miejscu do tej pory probowalem za pomoca hook'a i pojedyncze klikniecia dzialaly elegancko ale podwojne nie chce reagowac czemu? Oto kod jak to robilem na pojedynczym:
function MouseHook(Code: Integer; wParam : WPARAM;
lParam : LPARAM): Longint; stdcall;
var
Buffer : TEventMsg;
P : TPoint;
Buffer2 : array[0..128] of Char;
begin
Result := 0;
Buffer := PEventMsg(lParam)^;
case Buffer.message of
WM_MBUTTONDOWN : WMMIDDLE:=true;
WM_MBUTTONUP : WMMIDDLE:=false;
end;
if Buffer.message=WM_LBUTTONDOWN then
if WMMIDDLE=true then
Msg(1);
if Buffer.message=WM_RBUTTONDOWN then
if WMMIDDLE=true then
Msg(5);
end;
`</code>`