اموزش گرفتن چقدر مانده از اتمام باتری

[amirhossein.kashan 22]

سلام و خسته نباشید

اول باید لایبری phone را تیک بزنید و بعد از تیک و عال شدن این کد را بدید درصد باتریتون می اید

Sub Globals

   Dim iman As PhoneEvents
End Sub


Sub Activity_Create(FirstTime As Boolean)
iman.Initialize("iman")
End Sub


Sub iman_BatteryChanged (Level As Int, Scale As Int, Plugged As Boolean, Intent As Intent)
   Log("BatteryChanged: Level = " & Level & ", Scale = " & Scale & ", Plugged = " & Plugged)

[center]End Sub[/center]

اگه سوال بود بفرمایید

نظر فراموش نشه