Well, I'm not sure you can. See "OLE Automation Dim As Variant in VFP?" Thread #
345401 Message #
345401.
AutoCad doesn't like the way VFP passes arrays for some reason. ComArray is supposed to fix it (change VFP 1 based array to 0 based) but I've gotten it to work. You may want to try it and see.
AFA the double, it's just a real number
MyDouble = 2.0001 && should work.
Sorry I couldn't be of more help.
If you can't get it work, you may consider creating a VB dll and calling that from VFP.
>Roi, Thank you for helping me on this one.
>
>Raster is the right method but I cannot figer how to pass parameters.
>I can pass the file name no problem but from VFP how do you pass double integer to ACAD?
>
>This is a exemple from VB.
>
>Dim insertionPoint(0 To 2) As Double
>Dim scaleFactor As Double
>Dim rotAngleInDegree As Double, rotAngle As Double
>insertionPoint(0) = 10#
>insertionPoint(1) = 10#
>insertionPoint(2) = 0#
>scaleFactor = 1#
>rotAngleInDegree = 0#
>rotAngle = rotAngleInDegree * 3.141592 / 180#
>'creates a raster image in paper space
>
>Set anObj = acadObj.ActiveDocument.PaperSpace.AddRaster(imageName, insertionPoint, scaleFactor, rotAngle)
>
>
>
>
>>>
>>>oACAD= createObject("Autocad.Application")
>>>oACAD.Visible=.t.
>>>oACAD.ActiveDocument.Open("C:\MyTemplate.dwg") && Empty DWG
>>>
>>>The AutoCAD command to import the .TIF is Image. What is the OLE method to do the same?
Roi
'MCP' Visual FoxPro
In Rome, there was a poem.
About a dog, who found two bone.
He lick the one, he lick the other.
He went pyscho, he drop dead!