delphi - 如何检查仍然与 Delphi 10.3 连接的 BLE 设备

Question

我已成功将我的 Delphi(FM) 应用程序连接到 ESP32 设备，我可以通过 BLE 发送命令/接收数据(连接成功/失败后，我会显示连接状态消息)。但问题是，如果用户关闭/关闭 ESP32 设备，则移动应用程序仍会显示已建立连接。

我都试过了 System.Bluetooth.TBluetoothConnectionState和 System.Bluetooth.TBluetoothLEManager.ConnectionState使用 TTimer 但没有成功。

if not (BLEDevice1.ConnectionState = TBluetoothConnectionState.Connected) then
  begin
  Showmessge('Connection not established!');
  // this type of control doesn't change anything.
  end;

Answer 1

使用蓝牙设备(TBluetoothLEDevice)的OnDisconnect事件