Class TfrmJoy (unit Joy)

Inherits from

TForm

Constructors



Functions

procedure butNextClick(Sender: TObject);

Form-calls - Calls from buttons

determine dead spot of Joystick


procedure FormClose(Sender: TObject; var Action: TCloseAction);

Case-End

procedure FormCreate(Sender: TObject);


procedure FormShow(Sender: TObject);

Form-calls - other events like create, MouseMove .

procedure IdleProc(Sender: TObject; var Done : Boolean);

Additional stuff

To check Joystick-buttons : but1 := (myjoy.


procedure Timer1Timer(Sender: TObject);

status : 3

Properties

Events

Variables

butCancel : TBitBtn;


butCustomize : TButton;


butNext : TButton;


butOK : TBitBtn;


CheckBox1 : TCheckBox;


CheckBox2 : TCheckBox;


chkCenter : TCheckBox;


GroupBox1 : TGroupBox;


GroupBox2 : TGroupBox;


GroupBox3 : TGroupBox;


horzTrackbar : TTrackBar;


lblPos : TLabel;


Memo1 : TMemo;


Panel1 : TPanel;


Timer1 : TTimer;


vertTrackBar : TTrackBar;


CallbackFunction : TCallbackJoy;

Public declarations

Enabled : boolean;

Pointer to function that has to be called when Joy "out of normal"

JoyCfg : TJoyConfig;


status : byte;

Private declarations


Constructors


Functions


procedure butNextClick(Sender: TObject);

Form-calls - Calls from buttons

determine dead spot of Joystick


procedure FormClose(Sender: TObject; var Action: TCloseAction);

Case-End


procedure FormCreate(Sender: TObject);


procedure FormShow(Sender: TObject);

Form-calls - other events like create, MouseMove ...


procedure IdleProc(Sender: TObject; var Done : Boolean);

Additional stuff

To check Joystick-buttons : but1 := (myjoy.wbuttons and joy_button1)>0; but2 := (myjoy.wbuttons and joy_button2)>0;


procedure Timer1Timer(Sender: TObject);

status : 3


Properties


Events


Variables


butCancel : TBitBtn;


butCustomize : TButton;


butNext : TButton;


butOK : TBitBtn;


CheckBox1 : TCheckBox;


CheckBox2 : TCheckBox;


chkCenter : TCheckBox;


GroupBox1 : TGroupBox;


GroupBox2 : TGroupBox;


GroupBox3 : TGroupBox;


horzTrackbar : TTrackBar;


lblPos : TLabel;


Memo1 : TMemo;


Panel1 : TPanel;


Timer1 : TTimer;


vertTrackBar : TTrackBar;


CallbackFunction : TCallbackJoy;

Public declarations


Enabled : boolean;

Pointer to function that has to be called when Joy "out of normal"


JoyCfg : TJoyConfig;


status : byte;

Private declarations