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

[mohammade79 127]

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

اینم سورس هام

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

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

 

[mohammad-alone 564]

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

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

[mohammade79 127]

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