Now can i know if cell phone accept my conection in wclProximitySender

[cyp]

Hello,

   I?m using wclProximitySender.

1) How many Transfer Files can wclProximitySender do at same time?
2) How can i know if cell phone accept or reject my bluetooth message?
3) Is it possible use more than 1 dongle to transfer file? How can i do it and how can i use this to sendo to diferent cell phone and not to same cell phone twice?

Thks

[Mike Petrichenko]

Good day!

1. Depends on your hardwary. Usually up to 7.
2. http://www.btframework.com/errors.htm
3. Yes. Use more than 1 proximity sender (1 per dongle).

[cyp]

Thnks

Sorry but this erro code didnt?show when i reject ou accept a conection. Can you send a exemple in wich event this show the Reject error ?

[Mike Petrichenko]

WCL_ERROR_CANCELLED_BY_USER and WCL_ERROR_UNABLE_CONNECT usually means Reject status, WCL_ERROR_SUCCESS - file accepted/sent, other errors usually mean Ignore

[cyp]

Hi Mike,

   Mike there is a help file?
   I?m using WCL Demo with comes with BTFramework to Delphi 2006.
   I insert a AplicationEvents to cath exectpion but WCL_ERROR_CANCELLED_BY_USER and WCL_ERROR_UNABLE_CONNECT dosen?t show in event Log nether in exection. When this excetion show and If you have a help file it will help a lot.
   I?m showing to you the log file that Demo app create.

Code: [Select]

Started
Discovery started
Discovery complete:
  (00:17:E4:2E:FC:EA)
Accept device (00:17:E4:2E:FC:EA)
Accepted devices:
  (00:17:E4:2E:FC:EA)
Get file
Connecting (00:17:E4:2E:FC:EA)
Connected (00:17:E4:2E:FC:EA) 8000F032
Disconnected (00:17:E4:2E:FC:EA)   ======>>> Here! I Rejected the File. In Disconnect event there aren?t property to show status Ok or Reject. There isnt? Try excpet to cath execption and it didn?t show any excetion to me
Sleep started
Sleep done
Discovery started
Stopped

Other error like WCL_ERROR_API_NOT_LOADED I saw but this "WCL_ERROR_CANCELLED_BY_USER and WCL_ERROR_UNABLE_CONNECT" i can?t see in your Demo and e receive e reject file.

thks

[Mike Petrichenko]

WCL does not raise exception it passes error as result parameter to the wclProximitySender events. WCL does not shipped with BTFramework demos.

[cyp]

Ok, it?s work. I will describe what i did to help other user.

Code: [Select]


procedure TFrmPrincipalBluetooth.wclProximitySenderConnected(Sender: TObject;
  Device: TwclBluetoothDevice; Result: Cardinal);
var
  ResultadoHex: string;
  ResultadoInt: Integer;
begin
  ResultadoHex := IntToHex(Result, 8);
  if ResultadoHex = '00000000' then
    ShowMessage('Accept')
  else
     ShowMessage('Not accept');
end;