Thema: Delphi DelphiX und DXInput

Einzelnen Beitrag anzeigen

Nightshade

Registriert seit: 7. Jan 2003
Ort: Menden
192 Beiträge
 
Delphi 7 Enterprise
 
#1

DelphiX und DXInput

  Alt 27. Jan 2004, 23:54
Ich habe folgendes Problem :

Ich habe an meinem Rechner 2 Joysticks (1 Normaler 7 Tasten 4-Achsen; und ein PC-Dash mit 37 Tasten)

Habe folgende Funktion :

Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
var t : integer;
begin
  DXInput1.Joystick.ID := 0;
  DXInput1.update;
  Label1.caption:='';
  for t := 0 to dxinput1.Joystick.ButtonCount -1 do begin
    if dxinput1.Joystick.Buttons[t] then
      Label1.caption := Label1.caption + '1'
    else
      Label1.caption := Label1.caption + '0';
  end;
end;
Und ich bekomme keinen Tastendruck angezeigt, d.h. wenn ich das Dash Board auf Bevorzugtes Gerät Stelle (Systemsteuerung) bekomme ich genau eine Taste, aber keine 37.

Hat jemand da Erfahrung mit mehreren Joysticks und DelphiX ??
Christian
Killing for peace is like fucking for virginity

Nightshade
  Mit Zitat antworten Zitat