jcBluetoothSPP

type jcBluetoothSPP = class(jControl)

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure Init; override;

  function jCreate;

  procedure jFree;

  function IsBluetoothEnabled;

  procedure Enable;

  function IsBluetoothAvailable;

  function IsServiceAvailable;

  procedure SetupAndStartService();

  procedure StopService;

  procedure Send();

  function ToSignedByte();

  procedure AutoConnect();

  procedure Connect();

  function GetConnectedDeviceAddress;

  function GetConnectedDeviceName;

  function GetPairedDeviceAddress;

  function GetPairedDeviceName;

  procedure Disconnect;

  function IsAutoConnecting;

  procedure CancelDiscovery;

  function IsDiscovering;

  function GetActivityDeviceListClass;

  procedure StartActivityDeviceListForResult;

  function GetIntentActionEnableBluetooth;

  procedure StartActivityEnableBluetoothForResult;

  function GetConnectionState;

  function GetConnectionStateAutoExtra;

  procedure SetDeviceTarget();

  procedure GenEvent_OnBluetoothSPPDataReceived();

  procedure GenEvent_OnBluetoothSPPDeviceConnected();

  procedure GenEvent_OnBluetoothSPPDeviceDisconnected();

  procedure GenEvent_OnBluetoothSPPDeviceConnectionFailed();

  procedure GenEvent_OnBluetoothSPPServiceStateChanged();

  procedure GenEvent_OnBluetoothSPPListeningNewAutoConnection();

  procedure GenEvent_OnBluetoothSPPAutoConnectionStarted();

published

  property OnDataReceived: TOnBluetoothSPPDataReceived; [rw]

  property OnConnected: TOnBluetoothSPPDeviceConnected; [rw]

  property OnDisconnected: TOnBluetoothSPPDeviceDisconnected; [rw]

  property OnConnectionFailed: TOnBluetoothSPPDeviceConnectionFailed; [rw]

  property OnConnectionStateChanged: TOnBluetoothSPPServiceStateChanged; [rw]

  property OnAutoConnection: TOnBluetoothSPPListeningNewAutoConnection; [rw]

  property OnAutoConnectionStarted: TOnBluetoothSPPAutoConnectionStarted; [rw]

end;

jcBluetoothSPP

jControl

TObject