This code will not show up the lightevent
Am I missing something?
Am I missing something?
B4X:
Dim pSensor As PhoneSensors
pSensor.Initialize(psensor.TYPE_LIGHT)
Log(pSensor.MaxValue)
If pSensor.StartListening("LightEvent")= True Then
Log("light sensor supported")
End If
Sub LightEvent
Log(pSensor.MaxValue)
End Sub