Source position: cbluetoothspp.pas line 40
type TOnBluetoothSPPDeviceConnected = procedure(
Sender: TObject;
deviceName: string;
deviceAddress: string
) of object;