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

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

ХЕЕЕЛП!!! подскажите, как работать с портом джойстика [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]

неужели никто не знает? Мастера, ау! Пожалуйста, помогите!


Наверх

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