General information
Category:
ActiveX controls in VFP
woops, when I pasted the code it did not fit into the window on one line so I removed "d as double", and forgot to edit the line x.comtest(@g,3,4,5) to x.comtest(@g,3,4). But even with the parameters being correct, it still does not work.
thanks,
Dan
>I am testing the use of ComArray. So naturally I created a simple dll in visual basic. The VB code follows:
>
>Function comtest(a() As Double, b As Double, c As Double) As Double
> comtest = a(1) + b + c
>End Function
>
>I call this from vb, NO PROBLEMO. So I call the dll in VFP 7.0
>
>x= CREATEOBJECT('Paramtest.Arraytest')
>?COMARRAY(x,0) && Just need to pass by value
>Dimension array g(3)
>g(1) = 1
>g(2) = 2
>g(3) = 3
>x.comtest(@g,3,4) && Generates an ole exception
>
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only