여기저기 후킹이라는걸 보고 해도 ㅠ.ㅠ



자기 어플리케이션빡에 안되더라고요..............



영문이라도 괜찮으니 후킹말구 이에 비슷하게 관련된 예제나 답변을



듣고 싶은데요 ㅠ.ㅠ



아즉 초보라. ㅠ.ㅠ. 무쟈하게 어렵네요.



아래는 DLL 펑션에 든 함수들인데요 무엇이 잘몬된건지 ㅠ.ㅠ



자기 어플리케이션에서만 메세지이벤트가 오구



나머지는 안와요 ㅠ.ㅠ Result := 1로 설정하면 키보드 같은경우 입력을 제한은 되던데



메세지 날리기는 안되더군요 ㅠ.ㅠ 거지 동냥 해주는 셈치구 좀 도와주세요



procedure SetSystemHook(ValHWND:HWND);

begin

CallHWND := ValHWND;

hSystemHook2 := SetWindowsHookEx(WH_MOUSE,@SystemMouse_Hook, HInstance, 0);

end;



function SystemMouse_Hook(code: Integer; wparam: WPARAM; lparam: LPARAM): LRESULT;

begin

if code >= 0 then begin

PostMessage(CallHWND,WM_SYSTEM_INPUT,0,0);

Result := 0;

end else

Result := CallNextHookEx(hSystemHook2,code, wparam, lparam);



end;