Не ми се получава, пробвах доста варианти. Мисля че в projecta се вкарваше нещо там.
Номера е тези клавиши да се блокират и да работят само с тази програма в минимизиран режим. Като изключение с комбинация от клавиши.
Това най ме изкефи :
function KeyboardHookProc(Code: Integer; WordParam: Word; LongParam: LongInt): LongInt; stdcall;
begin
case WordParam of
vk_Right: x := x+1;
vk_Left: x := x-1;
vk_Up: y := y-1;
vk_Down: y := y+1;
end; {case}
end;

Съдържаниет е скрито
Влезте за да го видите