jBluetooth

type jBluetooth = class(jControl)

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure Init; override;

  function jCreate;

  procedure jFree;

  procedure Enabled;

  procedure Discovery;

  procedure CancelDiscovery;

  function GetPairedDevices;

  function GetFoundedDevices;

  function GetReachablePairedDevices;

  procedure Disable;

  function IsEnable;

  function GetState;

  function GetReachablePairedDeviceByName();

  function GetReachablePairedDeviceByAddress();

  function IsReachablePairedDevice();

  function GetRemoteDevice();

  procedure UnpairDeviceByAddress();

  function GetFoundedDeviceByAddress();

  procedure PairDeviceByAddress();

  procedure GenEvent_OnBluetoothEnabled();

  procedure GenEvent_OnBluetoothDisabled();

  procedure GenEvent_OnBluetoothDeviceFound();

  procedure GenEvent_OnBluetoothDiscoveryStarted();

  procedure GenEvent_OnBluetoothDiscoveryFinished();

  procedure GenEvent_OnBluetoothDeviceBondStateChanged();

  function GetBondState();

  procedure SendFile();

published

  property OnEnabled: TOnNotify; [rw]

  property OnDisabled: TOnNotify; [rw]

  property OnDeviceFound: TOnDeviceFound; [rw]

  property OnDiscoveryStarted: TOnNotify; [rw]

  property OnDiscoveryFinished: TOnDiscoveryFinished; [rw]

  property OnDeviceBondStateChanged: TOnDeviceBondStateChanged; [rw]

end;

jBluetooth

jControl

TObject