Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Dim As Variant in VFP?
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Titre:
Dim As Variant in VFP?
Divers
Thread ID:
00345401
Message ID:
00345401
Vues:
54
I'm trying to insert drawings into AutoCAD from VFP. Of course, there are guides for doing this stuff in VB, but not for VFP. Most of my problems are related to variable types that don't seem to be available in VFP.

For example, to grab the X,Y,Z co-ordinate of a point in AutoCAD, you must:

==================================================================
Dim InsPt As Variant
Dim strX As String, strY As String
Dim Units As Long

' Return a point using a prompt
InsPt = ThisDrawing.Utility.GetPoint(, "Select Insertion Point: ")
strX = InsPt(0)
strY = InsPt(1)
Units = ThisDrawing.GetVariable("luprec") ' get the drawing's units precision

strX = FormatPnt(strX, Units) ' format the point to the drawing's units precision
strY = FormatPnt(strY, Units)
edXpnt.Text = strX ' display the point
edYpnt.Text = strY
==================================================================

My question is, how do I deal with variables of type 'variant' in VFP?

TIA
Kogo Michael Hogan

"Pinky, are you pondering what I'm pondering?"
I think so Brain, but "Snowball for Windows"?

Ideate Web Site
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform