چطوری میتونم توی بیسیک فور اندروید مقدار شارژ طرف رو بگیرم

[Mobin Ebrahimi 0]

سلام ببخشید راهی هست که بتونم توی بیسیک فور اندروید مقدار شارژ گوشی طرفمو بگیرم و مثلا توی لاگ چاپ کنم

البته نمیخوام هربار توی لاگ چاپ شه میخوام مثلا وقتی از سمت سرور یه پیام دادم یا خود کاربر یه باتن مشخص رو زد مقدار شارژو توی یه متغیر سیو کنم حالا یا توی لاگ چاپ کنم یا به خود کاربر برگردونم😇

[User 97]

سلام ، کتابخانه های جاواابجکت و AriaIntent رو تیک بزنید

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("Layout")
	Log(GetBatteryLevel & "%")
End Sub

Sub GetBatteryLevel As Int
	Dim context As JavaObject
	Dim intentFiler As JavaObject
	Dim Aintent As AriaIntent
	intentFiler.InitializeNewInstance("android.content.IntentFilter",Array(Aintent.ACTION_BATTERY_CHANGED))
	Dim JavaIntent As Object = context.InitializeContext.RunMethod("registerReceiver",Array(Null,intentFiler))
	Aintent.initialize2(JavaIntent)
	Return Aintent.GetExtra("level")
End Sub

اگر آریا اینتنت رو ندارید از این لینک دریافت کنید : https://answercenter.ir/applications/core/interface/file/attachment.php?id=3435

[DexterFstone 391]

در ۱۴۰۰/۶/۲۰ در ۰۹:۵۲، Soheil_Miresmaili گفته است:

سلام ، کتابخانه های جاواابجکت و AriaIntent رو تیک بزنید

Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("Layout")
	Log(GetBatteryLevel & "%")
End Sub

Sub GetBatteryLevel As Int
	Dim context As JavaObject
	Dim intentFiler As JavaObject
	Dim Aintent As AriaIntent
	intentFiler.InitializeNewInstance("android.content.IntentFilter",Array(Aintent.ACTION_BATTERY_CHANGED))
	Dim JavaIntent As Object = context.InitializeContext.RunMethod("registerReceiver",Array(Null,intentFiler))
	Aintent.initialize2(JavaIntent)
	Return Aintent.GetExtra("level")
End Sub

اگر آریا اینتنت رو ندارید از این لینک دریافت کنید : https://answercenter.ir/applications/core/interface/file/attachment.php?id=3435

نیاز به این همه کد نیست مگه میخوای ناسا هک کنی🤣

خیلی ساده اول تیک کتابخانه Phone را میزنمیم بعد

	Dim p As PhoneEvents
	p.Initialize("P")

Sub P_BatteryChanged (Level As Int, Scale As Int, Plugged As Boolean, Intent As Intent)
	Log(Level(
	p.StopListening
End Sub

برای اولین بار که برنامه اجرا بشه بت عدد میده بعد میتونی غیر فعالش کنی تمام