快问快揭帖！

[hjkto]

function HookProc(nCode: Integer; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
var
p: PKBDLLHOOKSTRUCT;
y: Integer;
begin
y:= 0;
if nCode = HC_ACTION then
begin
case WParam of
WM_KEYDOWN, WM_SYSKEYDOWN:
begin
p:= PKBDLLHOOKSTRUCT(Lparam);

if (GetKeyState(162) <0) and (p^.vkCode = Ord('Z')) and (p^.vkCode = Ord('8')) then

begin
y:=1;
showmessage('dd');

end;

我想按下ctrl＋z＋8，弹出一个对话框，上面的代码应该如何修改？

[mjp1234airen4385]

貌似没有问题。
if (GetKeyState(162) <0) and ((p^.vkCode = Ord('Z')) or (p^.vkCode = Ord('z'))) and (p^.vkCode = Ord('8')) then

[hjkto]

[Quote=引用 1 楼 mjp1234airen4385 的回复:]
貌似没有问题。
if (GetKeyState(162) <0) and ((p^.vkCode = Ord('Z')) or (p^.vkCode = Ord('z'))) and (p^.vkCode = Ord('8')) then
[/Quote]

先谢谢你回帖
但是你的代码不行，按下ctrl+z+8没有反映，没有弹出对话框！？

[hjkto]

up