Search Results

Yes. Use Serial.GetPairedDevices. Yes. Also make sure not to initialize AsyncStreams in prefix mode, in this case.
link: GetPairedDevices Dim l As List l.Initialize For i = 0 To PairedDevices.Size - 1 l.Add(PairedDevices.GetKeyAt(i)) Next In

#Region Module Attributes #FullScreen: False #IncludeTitle: true #ApplicationLabel: Scan Example #VersionCode: 1 #VersionName: V1.0 #SupportedOrientations: portrait #CanInstallToExternalStorage: False #End Region 'Activity module Sub Process_Globals Dim serial1 As Se
link: Just use a timer which starts when the connection is broken. The timer will call serial1.Connect(PairedDevices.Get(MACADDRESS)) every 5 secs or so.

Public Sub Connect As ResumableSub Dim PairedDevices As Map = Serial1.GetPairedDevices Dim trovato As Boolean = False For Each k As String In KPrinters <-- list of authorized printers If PairedDevices.ContainsKey(k) Then Log("Test Paired: "&
link: Thank you @Erel. I agree about jSerial being dedicated to what its name implies, serial ports. So, out of curiosity, why B4A Serial extends to paired
link: jSerial works with serial ports. It doesn't know anything about pairing. You can get the "friendly com name": https://www.b4x.com/android/forum/threa

API '********** 'Initialize the object with the parent and event name Public Sub Initialize(vCallback As Object, vEventName As String) EventName = vEventName CallBack = vCallback Serial1.Initialize("Serial1") Connected = False ConnectedError = "" End Sub ' Returns any error rai
link: Hi, the demo app when i press on "Scan Print Bluetooth" return this error: java.lang.RuntimeException: Field: LastDiscoveredDevice not found in: anywh

Call Serial.GetPairedDevices.
link: AsyncStreams has nothing to do with finding devices. AsyncStreams reads and writes data to an established connection. There is a single API in Androi

Move value to Left side of comparison. Use Resultset instead of Cursor so it will be supported for B4i if it is going to be a B4 ' Ask the user to connect to a printer and return whether she tried or not ' If True then a subsequent Connected event will indicate success or failure Public Sub Connect

Sub mnuConnect_Click Dim PairedDevices As Map PairedDevices = Serial1.GetPairedDevices Dim l As List l.Initialize For i = 0 To PairedDevices.Size - 1 l.Add(PairedDevices.GetKeyAt(i)) 'add the friendly name to the list Next Dim res As Int res = InputList(l, "Ch

Si en el IDE dejas el ratón sobre cualquier componente, te muestra una ayuda contextual, por ejemplo, al poner el ratón sobre la librería Serial, te muestra esto. 137165 Verás que en la parte de abajo hay un enlace a este tutorial Si lo lees, verás que hay una parte que indica: "When the user pre
link: Hola José!!! gracias pa! me acabas de demostrar que estaba acertado. Ayer justamente en el link de figorra vi el "GetPairedDevice" lo que coincide con

Hi,I'm new to 4BX so very much in the learning curve. I created an app based on the BT tutorial and all worked fine, communicating with a PIC uP. Then, I tried using the same code using B4XPages. I cannot get it to work. The error I get is at this line of code" PairedDevices = Serial1.GetPairedDevi

Have you paired your instrument? Does it appear in your connected devices list in settings? If so then it should be as simple as this ' Ask the user to connect to a printer and return whether she tried or not ' If True then a subsequent Connected event will indicate success or failure Public Sub Con
link: Public Sub Connect As Boolean Dim PairedDevices As Map Dim A, A1 As String PairedDevices = Serial.GetPairedDevices Dim l As List
link: Private Sub Admin_StateChanged (NewState As Int, OldState As Int) Log("state changed: " & NewState) BluetoothState = NewState = Admin.STATE_ON

Powered by ColBERT