Einzelnen Beitrag anzeigen

dnullr

Registriert seit: 5. Apr 2013
5 Beiträge
 
#2

AW: BluetoothLE mit WinRT

  Alt 25. Mär 2020, 18:40
Hallo zusammen, kleiner Nachtrag, vielleicht ist mein Problem doch ein anderes.

Ich verwende eine TBluetoothLE Komponente in meinem Testprojekt. Per Buttonclick suche ich Geräte...

Code:
BluetoothLE1.DiscoverDevices(3000, [cSERVICE_UUID])
... und suche anschließend nach Services und Characteristics:

Code:
    BluetoothLE1.DiscoverServices(btDevice); //btDevice wurde im OnDiscoverLEDevice zugewiesen und ist das korrekte Gerät
    btService := BluetoothLE1.GetService(btDevice, cSERVICE_UUID);
    if btService <> nil then
    begin
      BluetoothLE1.GetCharacteristics(btService); //diese Zeile führt zum permanent Connect..Disconnect
      btChar := BluetoothLE1.GetCharacteristic(btService, cCHAR_UUID);
      if btChar <> nil then
      begin
        BluetoothLE1.SubscribeToCharacteristic(btDevice, btChar);
      end;
    end;
Mit der kommentierten markierten Zeile (GetCharacteristics) beginnt mein Problem: es feuert permanent das OnConnect und OnDisconnect Event. Es scheint keine echte Verbindung zustande zu kommen.

Das Gerät habe ich zuvor (Windows 10) gekoppelt, muss man ja wohl unter Windows 10 auch bei LE Geräten tun. Wenn ich testweise versuche unter iOS auf das Gerät zuzugreifen, funktioniert es prima, da kommt eine "dauerhafte" Verbindung sofort hin mit dem Auslesen der Characteristics.

Vielleicht fehlt mir nur irgendein Aufruf, den ich in der Dokumentation / den Samples übersehen habe.

Vielen Dank und einen schönen Abend!
  Mit Zitat antworten Zitat