Rabota s Mi6koj
Podskazite plizzzzzzzz kak uznat`? Nazata li knopka mi6ki?
HELP!!!
Ja vob6e ne predstavljaju kak eto sdelat!!!
Raskazivaju!!!!
Stavi6 Hool na mi6ku vigledet eto tak!
var
Msg: PEventMsg;
begin
Msg := Pointer(LParam);
if Msg.Message = WM_LBUTTONDOWN then forhook:='Click';
if Msg.Message = WM_RBUTTONDOWN then forhook1:='RCl';
Result := CallNextHookEx(Hook, Code, WParam, LParam);
end;
Polnij primer v nete poi6ite kamu nado!
Stavi6 Hool na mi6ku vigledet eto tak!
var
Msg: PEventMsg;
begin
Msg := Pointer(LParam);
if Msg.Message = WM_LBUTTONDOWN then forhook:='Click';
if Msg.Message = WM_RBUTTONDOWN then forhook1:='RCl';
Result := CallNextHookEx(Hook, Code, WParam, LParam);
end;
Polnij primer v nete poi6ite kamu nado!