Na wstępie zaznaczę, iż jestem początkującym programistą a z Javą a tym bardziej ze środowiskiem Android nie miałem kompletnie styczności.
Założenie programu jest bardzo proste w początkowej fazie. Program ma: Wyszukać urządzenie BLE > Wybrać z listy odpowiednie > Połączyć się z nim > Wysłać do niego jakikolwiek znak, ciąg znaków, tekst.
Buszowałem wnikliwie oficjalne forum Basic 4 Android, znalazłem przykłady zastosowania biblioteki BLE2, która właśnie do tego została stworzona. Mój kod w tym momencie zakłada samo skanowanie, gdyż już na tym poległem. Wkleję poniżej kod i zwrócony błąd.
[syntax=vb]#Region Service Attributes
#StartAtBoot: False
#ExcludeFromLibrary: True
#End Region
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
Public ble As BleManager2
Private serviceID, charID As String
Private tablica As String
Private connected As Boolean
Dim Stan As String
End Sub
Sub Service_Create
'This is the program entry point.
'This is a good place to load resources that are not specific to a single activity.
ble.Initialize("ble")
'serviceId = UUID("ffe0")
'charID = UUID("ffe1")
End Sub
Sub ble_StateChanged (Stn As Int)
Select Stn
Case ble.STATE_POWERED_OFF
Stan = "Wyłączony Bluetooth"
Case ble.STATE_POWERED_ON
Stan = "Bluetooth Włączony"
Case ble.STATE_UNSUPPORTED
Stan = "Bluetooth nie wspiera funkcji"
End Select
CallSub("Main", "BleStateChanged")
If Stn = ble.STATE_POWERED_ON Then
ble.Scan2(Array (tablica), False)
End If
'CallSub("Main", "Lista")
End Sub
Sub ble_Znaleziono(Name As String, Id As String, AdvertisingData As Map, RSSI As Double)
Log($"Urządzenie: ${Name}"$)
ble.Connect2(Id, False)
End Sub
Sub Service_Start (StartingIntent As Intent)
End Sub
Sub Service_TaskRemoved
'This event will be raised when the user removes the app from the recent apps list.
End Sub
'Return true to allow the OS default exceptions handler to handle the uncaught exception.
Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
Return True
End Sub
Sub Service_Destroy
End Sub[/syntax]
Zwrócony błąd:
Code:
Logger połączony z: Xiaomi Redmi 3
--------- beginning of main
*** Service (starter) Create ***
** Service (starter) Start **
** Activity (main) Create, isFirst = true **
** Activity (main) Resume **
Error occurred on line: 36 (Starter)
java.lang.IllegalArgumentException: Invalid UUID string:
at java.util.UUID.fromString(UUID.java:194)
at anywheresoftware.b4a.objects.BleManager2.Scan2(BleManager2.java:138)
at b4a.example.starter._ble_statechanged(starter.java:183)
at java.lang.reflect.Method.invoke(Native Method)
at anywheresoftware.b4a.shell.Shell.runMethod(Shell.java:710)
at anywheresoftware.b4a.shell.Shell.raiseEventImpl(Shell.java:339)
at anywheresoftware.b4a.shell.Shell.raiseEvent(Shell.java:249)
at java.lang.reflect.Method.invoke(Native Method)
at anywheresoftware.b4a.ShellBA.raiseEvent2(ShellBA.java:139)
at anywheresoftware.b4a.BA.raiseEvent(BA.java:166)
at anywheresoftware.b4a.objects.BleManager2$1$1.run(BleManager2.java:83)
at android.os.Handler.handleCallback(Handler.java:751)
at android.os.Handler.dispatchMessage(Handler.java:95)
at android.os.Looper.loop(Looper.java:154)
at android.app.ActivityThread.main(ActivityThread.java:6186)
at java.lang.reflect.Method.invoke(Native Method)
at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:889)
at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:779)
Zdaję sobie sprawę że błąd dotyczy typu zmiennej - Wczytanie wartości string do Tablicy, jednak w przykładach które można znaleźć tutaj PASTEBIN autor używa tej funkcji w dokładnie taki sam sposób, a aplikacja nie zwraca błędu.Statystyki: Napisane przez Bertek — 7 sty 2018, o 13:29
]]>