среда Delphi позволяет работать с игровыми джойстиками. Этот исходный код демонстрирует это, каждый может переписать его под себя, главное - он показывает технологию работы с джойстиком. 

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) модулей.