رفتن به مطلب
  • 0

مچ کردن اسکرول ویو و اطلاعات وای فای


mohammade79

سوال

سلام بچه ها ن میخوام اطلاعات وای فای این برنامه رو در اسکرول ویو حرفه ای بدم ولی نمیتونم مچ نمیشه با حلقه فور زیاد کار نکردم میشه کمکم کنید؟

اینم سورس هام

Sub Process_Globals
	Dim wifi As ABWifi
End Sub

Sub Globals
End Sub

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	' initialize ABWifi
	wifi.Initialize("wifi")	
End Sub

Sub Activity_Resume
	' start ABWifi
	wifi.StartWifi
	' Get a reading
	wifi.GetNewReadingWifi
End Sub

Sub Activity_Pause (UserClosed As Boolean)
	' stop ABWifi
	wifi.StopWifi
End Sub

Sub wifi_FoundReadings(readings As List)
	Dim i As Int
	For i = 0 To readings.Size - 1
		Dim reading As ABWifiReading = readings.Get(i)
		Log("---------------------------------")
		Log("BSSID: " & reading.BSSID)
		Log("Level: " & reading.Level)
		Log("IsConnected: " & reading.IsConnected)
		Log("Frequency: " & reading.Frequency)
		Log("IsBestSignal: " & reading.IsBestSignal)
		Log("نام: " & reading.SSID)
		Log("Capabilities: " & reading.Capabilities)
	Next
	
	wifi.GetNewReadingWifi
End Sub

 سورس کاستوم اسکرول ویوم رو هم که تو انجمن هست میخوام با اون مچ کنم

 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

2 پاسخ به این سوال تاکنون داده شده است

ارسال های توصیه شده

دوست عزیز منظورتون از مچ شدن چی هستش ؟؟؟؟

خیلی گنگه این مچ خخخخخخخخخخخخخ

لینک ارسال
به اشتراک گذاری در سایت های دیگر

منظورم اینه که نمیتونم کاری کنم که اطلاعات لوگ بجای تکست کاستوم ویو باشه

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...