Source position: bluetoothserversocket.pas line 17
type TOnListen = procedure(
Sender: TObject;
serverName: string;
strUUID: string
) of object;