Delphi с Bluetooth Low Energy: Откройте для себя устройства

Question

Я запускаю приложение с Bluetooth Low Energy, разрабатываю для Android в Delphi 10.2 Tokyo и Windows 10.

Я создал новый проект, содержащий TButton и объект TBluetoothLE в TForm. Событие TButton OnClick содержит только этот код:

BluetoothLE1.Enabled: = True;
BluetoothLE1.DiscoverDevices(2000);

В моих первых тестах было две проблемы:

Проблема 1 ) При запуске приложения (с F9) и выполнении BluetoothLE1.DiscoverDevices(2000); устройство BLE не найдено, если оно не запускает вышеуказанный OnClick дважды (но устройство BLE работает и доступно рядом с ним). меня, который я могу найти с помощью другого приложения). Даже если я изменю значение TimeOut (плюс или минус), устройство не будет найдено, если BluetoothLE1.DiscoverDevices запущен только один раз.

Проблема 2 ) Когда приложение закрывается (после запуска с F9 и выполнения DiscoverDevices), возникает Invalid Pointer Operation. Эта ошибка также возникает с примерами Embarcadero BluetoothLE. Ошибка при запуске приложения с Shift+Ctrl+F9.

Есть ли решение этих проблем? Как?

Answer 1

Вы можете найти только сопряженные устройства BLE при запуске приложения на платформе Windows. Есть много ошибок в реализации Delphi Bluetooth. Я не знаю о части Android, но для Windows вам нужно другое решение, чем Delphi по умолчанию.