Skocz do zawartości

byforowanie klawiatury


Viper

Recommended Posts

Eh, mam do tego co ty chchesz przykład jak zrobic hook'a myszki i to w Delphim. Ale z przerobieniem tego na klawoiature w c++ nie bedzie problemu bo przeciez to czytse winapi:

library MHook;

uses
  SysUtils,
  Classes,
  Messages,
  Windows;

{$R *.RES}

const wm_Mysz = wm_User+1234;

function MouseHook(Code:integer; WP:integer; LP:integer):integer; stdcall;
var P:PMouseHookStruct;
    H:THandle;
begin
  if (WP=wm_RButtonDown)or(WP=wm_LButtonDown) then
  begin
    P:=Pointer(LP);
    H:=FindWindow('TForm2','PGear - Kolory');
    if H<>0 then
     PostMessage(H,wm_Mysz,P^.pt.X,P^.pt.Y);
  end;
  Result:=0;
end;

exports MouseHook;

begin
end.
Link do komentarza
Udostępnij na innych stronach

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Gość
Odpowiedz...

×   Wkleiłeś zawartość bez formatowania.   Usuń formatowanie

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Utwórz nowe...