|
Тема |
Re: BUTTON-и ;) [re: ValM] |
|
Автор |
Timo (собствен ник ) |
|
Публикувано | 03.01.15 19:43 |
|
|
Не ми се получава, пробвах доста варианти. Мисля че в 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;
|
| |
|
|
|