| Class TCustomInput (unit DXInput) |
TPersistent
| Constructors |
constructor Create(DXInput: TCustomDXInput);| Functions |
destructor Destroy;
procedure Update;
procedure Acquire;
procedure Finalize;
function GetButton(Index: Integer): Boolean;
function GetCooperativeLevel: Integer;
function GetDeviceState(dwSize: Integer; var Data): Boolean;
procedure Initialize;
function SetDataFormat: Boolean;
procedure SetEffects(Value: TForceFeedbackEffects);
procedure SetEnabled(Value: Boolean);
procedure SetForceFeedback(Value: Boolean);
procedure SetWindowHandle(Value: Integer);| Properties |
property Effects : TForceFeedbackEffects
property Enabled : Boolean
property ForceFeedback : Boolean
property ButtonCount : Integer
property Buttons : Boolean
property States : TDXInputStates| Events |
| Variables |
FButtonCount : Integer;
FDataFormat : DIDATAFORMAT;
FDataFormatGUIDs : array[0..255] of TGUID;
FDataFormatObjects : array[0..255] of DIOBJECTDATAFORMAT;
FDevice : IDirectInputDevice;
FDevice2 : IDirectInputDevice2;
FDXInput : TCustomDXInput;
FEffects : TForceFeedbackEffects;
FEnabled : Boolean;
FForceFeedback : Boolean;
FForceFeedbackDevice : Boolean;
FStates : TDXInputStates;| Constructors |
constructor Create(DXInput: TCustomDXInput);TCustomInput
| Functions |
destructor Destroy;
procedure Update;
procedure Acquire;
procedure Finalize;
function GetButton(Index: Integer): Boolean;
function GetCooperativeLevel: Integer;
function GetDeviceState(dwSize: Integer; var Data): Boolean;
procedure Initialize;
function SetDataFormat: Boolean;
procedure SetEffects(Value: TForceFeedbackEffects);
procedure SetEnabled(Value: Boolean);
procedure SetForceFeedback(Value: Boolean);
procedure SetWindowHandle(Value: Integer);| Properties |
property Effects : TForceFeedbackEffects
property Enabled : Boolean
property ForceFeedback : Boolean
property ButtonCount : Integer
property Buttons : Boolean
property States : TDXInputStates| Events |
| Variables |
FButtonCount : Integer;
FDataFormat : DIDATAFORMAT;
FDataFormatGUIDs : array[0..255] of TGUID;
FDataFormatObjects : array[0..255] of DIOBJECTDATAFORMAT;
FDevice : IDirectInputDevice;
FDevice2 : IDirectInputDevice2;
FDXInput : TCustomDXInput;
FEffects : TForceFeedbackEffects;
FEnabled : Boolean;
FForceFeedback : Boolean;
FForceFeedbackDevice : Boolean;
FStates : TDXInputStates;