Bluetooth Framework 6 X for public tests

[viriato]

Also... is there any push object demo and proximitySender demo available for version 6?

[Mike Petrichenko]

http://www.btframework.com/download.htm

There is Personal Preview availbale with ProximitySender.

[viriato]

http://www.btframework.com/download.htm

There is Personal Preview availbale with ProximitySender.

I mean the ActiveX version (the one of this post)

[Mike Petrichenko]

NET is actually ActiveX

[viriato]

Sorry for the mess i mean the VisualBasic one that is attached to this post.

[Mike Petrichenko]

The version posted here was just a prototype of the library. There is no BTF 6. It was renamed to WCL and available as WCL on the site.

WCL .NET is actually ActiveX except has not demos for VB and C++ yet. The usage is the same as BTF but with class names changed.

[nickblair]

I think there is a difference between the way your functions (API) works in your c# program (demo-wcl-lite) and the way they work in vb.net. For instance your components in Showradios() do not work. As an example I have loaded wclAPI and this statement Radio.API = wclBluetoothAPI.baBlueSoleil which I use to prevent the radio=null with a bluesoliuel dongle is not actioned. I know this because my TextBox.Text statement after the previous statement is not actioned . The same happens with Address = Radio.Address , when this line is active then the textbox staterment is not actioned either. Here is my code.-
   Private Sub loadradio()
        TextBox1.Text = TextBox1.Text + "+Radio loaded"
        Radios = WclBluetoothDiscovery1.EnumRadios
        'Address = Radio.Address
        TextBox2.Text = WclBluetoothDiscovery1.BluetoothAPIToString(wclBluetoothAPI.baBlueSoleil)
        Radio.API = wclBluetoothAPI.baBlueSoleil
        TextBox1.Text = TextBox1.Text + "+Radio loaded"
    End Sub
Regards
Nick

[nickblair]

I mean, on the vb side, in the new WCL the 'radio' options which should appear after 'handles' (intellisense) are just not there. and i need those to write a showradio(radios(i) function.
cheers
nick.

[Mike Petrichenko]

It does not library work incorrect. It is mistake in your code.

Private Sub loadradio()
        TextBox1.Text = TextBox1.Text + "+Radio loaded"
        Radios = WclBluetoothDiscovery1.EnumRadios
        Radio = Radios[0]
        TextBox1.Text = TextBox1.Text + "+Radio loaded"
    End Sub

[nickblair]

Brilliant Mike, thank you so much
Regards
Nick

[nickblair]

Private Sub WclBluetoothDiscovery1_DiscoveryComplete(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles WclBluetoothDiscovery1.DiscoveryComplete
    End Sub

tried this but error:
Error   1   Method 'Private Sub WclBluetoothDiscovery1_DiscoveryComplete(sender As Object, e As System.EventArgs)' cannot handle Event 'Public Event DiscoveryComplete(sender As Object, e As wclnet.BluetoothDiscoveryCompleteEventArgs)' because they do not have the same signature.   C:\Documents and Settings\Owner\My Documents\Visual Studio 2005\Projects\TMEWCL\TMEWCL\Form1.vb   60   149   TMEWCL

[nickblair]

Hi Mike,
I mean, is WclBluetoothDiscovery1.DiscoveryComplete a system event argument?

cheers

Nick

[Mike Petrichenko]

 Private Sub WclBluetoothDiscovery1_DiscoveryComplete(ByVal sender As System.Object, ByVal e As wclnet.BluetoothDiscoveryCompleteEventArgs) Handles WclBluetoothDiscovery1.DiscoveryComplete

    End Sub

[nickblair]

Thanks for your brilliant help so far Mike.

Trying to read data with

  Private Sub wclClient_Data(ByVal sender As System.Object, ByVal e As wclnet.wclDataEventArgs) Handles WclClient1.Data
        Dim Coder As ASCIIEncoding
        'Coder = Coder(e.Data)
        Dim Str As String
        Str = Coder.GetString(e.Data)
        TextBox4.Text = TextBox4.Text + Str
    End Sub

Doesn't work and the error is
Warning   1   Variable 'Coder' is used before it has been assigned a value. A null reference exception could result at runtime.   C:\Documents and Settings\Owner\My Documents\Visual Studio 2005\Projects\TMEWCL\TMEWCL\Form1.vb   109   15   TMEWCL

Just can't seem to get it right.
Can you help??
Nick

[Mike Petrichenko]

Coder = new ASCIIEncoding()

P.S. I am really sorry, but I do not give the lessons for VB, C#, Delphi and other programming laguages because have no time for such service.