TSphere mithilfe MotionSensor drehen?

[Michael II]

Hallo

ich empfehle dir einen Blick in die Doku über "AvailableProperties" zu werfen. Damit kannst du abfragen, welche Fähigkeiten die in deinem Gerät eingebauten Sensoren haben.

Auf
https://sourceforge.net/p/radstudiod...ntationSensor/

gibt es ein sehr gutes Beispiel, dort unter

radstudiodemos-code-2024-branches-RADStudio_Berlin\Object Pascal\Multi-Device Samples\Device Sensors and Services\SensorInfo

Ich hab's rasch auf meinem alten Nexus10 gecheckt. Läuft gut.

Gruss und viel Spass beim Coden.

[derseitzer]

Michael: Ich werde mir die Dateien runterladen aber könntest du eventuell trotzdem erklären, was ich nun codieren muss damit es funktioniert

[BrightAngel]

Zitat von Michael II:

ich empfehle dir einen Blick in die Doku über "AvailableProperties" zu werfen. Damit kannst du abfragen, welche Fähigkeiten die in deinem Gerät eingebauten Sensoren haben.

Auf
https://sourceforge.net/p/radstudiod...ntationSensor/

Wieder was gelernt. Danke!

[Michael II]

Hallo derseitzer

ich empfehle dir den Code:

radstudiodemos-code-2024-branches-RADStudio_Berlin\Object Pascal\Mobile Snippets\OrientationSensor

von
https://sourceforge.net/p/radstudiod...ntationSensor/

zu laden und zu testen.

Dieses Beispiel zeigt dir, wie du die Lage deines Geräts im Raum abfragen kannst. (TiltX, TiltY, TiltZ). (Ich nehme an, dass du das willst.)


Wenn du nun die Sphäre je nach Lage deines Tablets anzeigen willst, dann arbeite entweder

- mit der Eigenschaft TSphere.RotationAngle

ODER (wenn du zum Beispiel eine Szene mit mehreren Elementen (nicht nur TSphere) darstellst)

- du lässt die Sphäre fix und arbeitest mit einer Kamera (TCamera), welche sich je nach ermittelten Tilt Werten um deine Sphäre bewegt. In diesem Fall musst du die Position und den Rotationswinkel deiner Kamera aufgrund der TiltWerte und dem von dir gewünschten Abstand (Kamera,Sphäre¦Szene) berechnen.


Gruss und viel Spass beim Coden...

[derseitzer]

vielen dank michael2!
Bei mir sind die Tilt-Werte immer 0.. die Heading werte allerdings nicht :/ warum?

[himitsu]

Zitat:

Eines davon gibt es auf Sourceforge.

Eigentlich sind das alle.
Wenn man sowieso die neuste Delphi-Version hat, kann man damit das Demo-Verzeichnis von Delphi aktualisieren.

Nur bei älteren Delphis muß man etwas aufpassen, da dort eben immer alles ans aktuellste Delphi angepasst wird und dann nicht immer alles in allen älternen Versionen mehr funktioniert.

Es wäre zu praktisch, wenn Emba da direkt beim DelphiSetup das SVN mit installiert (also die SVN-Kontrolldateien im Demoverzeichnis)

[derseitzer]

Dummy1.RotationAngle.X := 8*OrientationSensor1.Sensor.HeadingX;
Dummy1.RotationAngle.Y := 8*OrientationSensor1.Sensor.HeadingY;
Dummy1.RotationAngle.Z := 8*OrientationSensor1.Sensor.HeadingZ;

Dieser Code funktioniert allerdings liegt der Wertebereich der Headingwerte irgendwo ziwschen -45 und 45 (glaube ich zumindest).
Deshalb habe ich mal aus Testzwecken die Werte mal 8 genommen. Nun fiel mir beim Testen auf, dass meine Tsphere extrem empfindlich reagiert und ich die Werte irgendwie Runden sollte..

[Michael II]

Hallo derseitzer

wenn du nicht rausfindest in welchem Bereich die H Werte liegen, dann merk doch im Programm min und max .

Und zur Multiplikation mit 8. Wenn die Werte effektiv zwischen -45 und 45 liegen und du mit 8 multiplizierst, dann müssen wir Werte im Bereich -360..360 (Grad) befürchten. Ich habe grad keine Zeit nachzusehen, wie die H Werte definiert sind, aber 8 ist etwas viel...

https://developer.android.com/guide/..._overview.html

Gruss

[Michael II]

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

[Michael II]

Hallo derseitzer

du hast ja wahrscheinlich mittlerweile auch gesehen, dass die "Heading Werte" Daten zum Magnetfeld liefern - und "roh" für deine Aufgabe wohl nicht geeignet sind.

Es gibt übrigens coole Tools, mit welchen du rasch checken kannst, welche Sensoren in deinem Android Gerät eingebaut sind, zum Beispiel "Sensor Kinetics":

https://play.google.com/store/apps/d...kinetics&hl=de