Поставил себе Берлин (RAD Studio Delphi 10.1), решил ознакомиться с работой датчиков, телефон NEXUS 4, попробовал вывести
Код:
memo1.Text:='aX: '+floattostr(MotionSensor1.Sensor.AccelerationX)+' aY: '+floattostr(MotionSensor1.Sensor.AccelerationY);
memo2.Text:='DistanceX: '+floattostr(OrientationSensor1.Sensor.DistanceX)+' DistanceY: '+floattostr(OrientationSensor1.Sensor.DistanceY);
Код:
memo1.Text:='aX: '+floattostr(MotionSensor1.Sensor.AccelerationX)+' aY: '+floattostr(MotionSensor1.Sensor.AccelerationY);
memo2.Text:='DistanceX: '+floattostr(OrientationSensor1.Sensor.DistanceX)+' DistanceY: '+floattostr(OrientationSensor1.Sensor.DistanceY);