![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ХЕЕЕЛП!!! подскажите, как работать с портом джойстика [D5, Win2k]
hair_fly © (2002-03-11 14:26:00)Сабж.
Нужно определять замкнуты или нет 2-й и 4-й контакты.
Очень нужно! ПЛИЗ! ПОМОГИТЕ!
MBo (2002-03-15 07:25:00) [1]да я и джойстика никогда в руках не держал ;)
просто у Озерова по теме увидел.
hair_fly (2002-03-14 17:42:00) [2]>MBo
А приведенный пример может и работал бы, если бы у меня был подключен джойстик, но в моем случае joygetpos возвращает 165 (что это за ошибка я не знаю, и в MSDN не написано)
hair_fly (2002-03-14 17:38:00) [3]я наверное неточно сформулировал вопрос.
Дело в том, что джойстик у меня НЕ ПОДКЛЮЧЕН.
Вместо него у меня просто выведены контакты (2-й и 4-й), и нужно определить замкнуты они или нет.
Пожалуйста, помогите решить проблему. НУ ОЧЕНЬ НУЖНО!
MBo (2002-03-13 15:03:00) [4]из Кулибы
var myjoy: tjoyinfo;
begin
joygetpos(joystickid1,@myjoy);
trackbar1.position := myjoy.wypos;
trackbar2.position := myjoy.wxpos;
radiobutton1.checked := (myjoy.wbuttons and joy_button1)>0;
radiobutton2.checked := (myjoy.wbuttons and joy_button2)>0;
end;
Не забудьте включить MMSYSTEM в список используемых (USES) модулей.
hair_fly (2002-03-12 14:39:00) [5]неужели никто не знает? Мастера, ау! Пожалуйста, помогите!