Текущий архив: 2002.09.30;
Скачать: CL | DM;

Вниз

Как отследить события джойстика   Найти похожие ветки 

← →
Stanislav SM   (2002-07-17 17:10) [0]

Ув. Мастера, можно ли отследить события джойстика по аналогии с мышкой или клавиатурой.
У меня есть процедура отслеживания (в данном случае нажатия правой кнопки мыши), как изменить значения для событий джойстика?


function HookProc(Code: integer; WParam:
word; LParam: Longint): Longint; stdcall;
var
msg: PEVENTMSG;
begin
if Code >= 0 then begin
result := 0;
msg := Pointer(LParam);
with Form1 do
case msg.message of
WM_RBUTTONDOWN: label1.caption:="LB Down";
WM_RBUTTONUP: label1.caption:="LB Up";
end;
end else
result := CallNextHookEx(HookHandle, code, WParam, LParam);

end;




Заранее спасибо всем кто откликнется!

---

← →
Stanislav SM   (2002-07-19 17:03) [1]

Люди-и-и-и, помогите!

---

← →
Eugene Lachinov ©   (2002-07-19 17:18) [2]

Посмотри описание функций Joy????? в Help-Windows SDK

---

Страницы: 1 вся ветка

Текущий архив: 2002.09.30;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.029 c