Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как отследить события джойстика [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]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо