Class TCustomDXInput (unit DXInput)

Inherits from

TComponent

TCustomDXInput

Constructors


constructor Create(AOwner: TComponent);



Functions

destructor Destroy;


procedure Update;


procedure Loaded;


procedure Finalize;

Window handle of Form changed.

procedure FormWndProc(var Message: TMessage; DefWindowProc: TWndMethod);


procedure Initialize;


procedure SetActiveOnly(Value: Boolean);


procedure SetJoystick(Value: TJoystick);


procedure SetKeyboard(Value: TKeyboard);


procedure SetUseDirectInput(Value: Boolean);


procedure SetWindowHandle;


Properties

property ActiveOnly : Boolean


property Joystick : TJoystick


property Keyboard : TKeyboard


property States : TDXInputStates


property UseDirectInput : Boolean


Events

Variables

FActiveOnly : Boolean;


FDevice : TList;


FDInput : IDirectInput;


FForm : TCustomForm;


FJoystick : TJoystick;


FKeyboard : TKeyboard;


FOldStates : TDXInputStates;


FStates : TDXInputStates;


FSubClass : TControlSubClass;


FUseDirectInput : Boolean;



Constructors


constructor Create(AOwner: TComponent);


Functions


destructor Destroy;


procedure Update;


procedure Loaded;


procedure Finalize;

Window handle of Form changed.


procedure FormWndProc(var Message: TMessage; DefWindowProc: TWndMethod);


procedure Initialize;


procedure SetActiveOnly(Value: Boolean);


procedure SetJoystick(Value: TJoystick);


procedure SetKeyboard(Value: TKeyboard);


procedure SetUseDirectInput(Value: Boolean);


procedure SetWindowHandle;


Properties


property ActiveOnly : Boolean


property Joystick : TJoystick


property Keyboard : TKeyboard


property States : TDXInputStates


property UseDirectInput : Boolean


Events


Variables


FActiveOnly : Boolean;


FDevice : TList;


FDInput : IDirectInput;


FForm : TCustomForm;


FJoystick : TJoystick;


FKeyboard : TKeyboard;


FOldStates : TDXInputStates;


FStates : TDXInputStates;


FSubClass : TControlSubClass;


FUseDirectInput : Boolean;