Zitat:
Bei mir sind die Tilt-Werte immer 0.. die Heading werte allerdings nicht :/ warum?
Hast du mal gecheckt, ob dir dein Gerät den Wert z.V. stellt?
Das wird in deinem Beispiel hier geprüft:
Delphi-Quellcode:
procedure TOrientationSensorForm.OrientationSensor1SensorChoosing(
Sender: TObject; const Sensors: TSensorArray; var ChoseSensorIndex: Integer);
...
...
TCustomOrientationSensor.TProperty.TiltX in TCustomOrientationSensor(Sensors[I]).AvailableProperties
Wenn die Eigenschaft nicht z.V. steht, dann hol dir rasch ein neues Gerät
.
Wenn die Eigenschaft Tilt vorhanden ist, dann solltest du wohl einen Blick in die Umrechnung "Vektor > Winkel" werfen (ich nehme an, du spielst mit einem Android Gerät), also in die
unit System.Android.Sensors :
function TAndroidNativeRotationSensor.GetDoubleProperty(Prop: TCustomOrientationSensor.TProperty): Double;
eventuell in diese Zeile:
Len := 1 - sqX - sqY - sqZ;
Gruss