![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как отследить события джойстика [D4, Win95/98]
Stanislav SM © (2002-07-17 17:10:00)Ув. Мастера, можно ли отследить события джойстика по аналогии с мышкой или клавиатурой.
У меня есть процедура отслеживания (в данном случае нажатия правой кнопки мыши), как изменить значения для событий джойстика?
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;
Заранее спасибо всем кто откликнется!
Eugene Lachinov (2002-07-19 17:18:00) [1]Посмотри описание функций Joy????? в Help-Windows SDK
Stanislav SM (2002-07-19 17:03:00) [2]Люди-и-и-и, помогите!