GLScene/Examples/Demos/utilities/joystick/JoystickD.dpr

(*
   Using the TJoystick to retrieve joystick position.

   The component make it fairly easy to get this info. The first method is to use
   the events, the second it use its properties.
   I've tried to put both methods at use in this sample :
   spheres on the right are adjusted when button are pressed/depressed
   the 3D stick position is read in the rendering loop
*)
program JoystickD;

uses
  Forms,
  fJoystickD in 'fJoystickD.pas' {Form1};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.