giskumar Posted June 1, 2012 Posted June 1, 2012 Hi All, I have added a point using ThisDrawing.ModelSpace.AddPoint(pnt) Then Rotated the point using pnt.Rotate p, somevalue Now how can i read the current rotation value of the point? **The dxf code 50 representing the Rotation value. Thanks, Kumar. Quote
BlackBox Posted June 1, 2012 Posted June 1, 2012 'ThisDrawing'... sounds like a VBA thang... then this thread may help: http://forums.autodesk.com/t5/AutoCAD-Land-Desktop/AEC-Point-Rotation-and-Text-Size-through-VBA/td-p/621912 Quote
Joro-- Posted June 6, 2012 Posted June 6, 2012 It doesn't seems like the point object in VBA has no .Rotation property at all. It is just a point. To have a rotation you should better use a block containing a point or just any kind of block. Quote
BIGAL Posted June 13, 2012 Posted June 13, 2012 Search for DUMPENT.lsp good for finding out all sorts of stuff about an object and naming for VL & VBA will confirm if rotation supported. Quote
BlackBox Posted June 13, 2012 Posted June 13, 2012 (defun c:DUMP ( / eName) (if (setq eName (car (entsel "\nSelect object: "))) (progn (vlax-dump-object (vlax-ename->vla-object eName) T) (textpage)) (prompt "\n** Nothing selected ** ")) (princ)) Quote
BIGAL Posted June 14, 2012 Posted June 14, 2012 Thanks Renderman didn't have that lisp at time of post. Dumpfor a Autocad point does not appear to have rotation. NOTE CIV3D point is totally different Select object: ; IAcadPoint: AutoCAD Point Interface ; Property values: ; Application (RO) = #<VLA-OBJECT IAcadApplication 000000013fdc2308> ; Coordinates = (613.794 53.8048 0.0) ; Document (RO) = #<VLA-OBJECT IAcadDocument 0000000026ac7068> ; EntityTransparency = "ByLayer" ; Handle (RO) = "116C2" ; HasExtensionDictionary (RO) = 0 ; Hyperlinks (RO) = #<VLA-OBJECT IAcadHyperlinks 000000003768f208> ; Layer = "DEFAULT" ; Linetype = "ByLayer" ; LinetypeScale = 1.0 ; Lineweight = -1 ; Material = "ByLayer" ; Normal = (0.0 0.0 1.0) ; ObjectID (RO) = 87 ; ObjectID32 (RO) = 87 ; ObjectName (RO) = "AcDbPoint" ; OwnerID (RO) = 88 ; OwnerID32 (RO) = 88 ; PlotStyleName = "ByLayer" ; Thickness = 0.0 ; TrueColor = #<VLA-OBJECT IAcadAcCmColor 00000 Select object: 00037684520> ; Visible = -1 Quote
BlackBox Posted June 14, 2012 Posted June 14, 2012 You're welcome; I have a slew of Dump* and Entget* functions for various objects. I'd be happy to share if you'd find them useful. ** Edit - I do need to add Civil 3D specific support though; many of the Aecc* objects are not even supported by vlax-dump-object. I'm going to need to code some .NET LispFunction Methods to expand LISP for this. Quote
BIGAL Posted June 15, 2012 Posted June 15, 2012 Renderman your mailbox is full can not send you some help for AECC CIV3d Quote
BlackBox Posted June 15, 2012 Posted June 15, 2012 Renderman your mailbox is full can not send you some help for AECC CIV3d Thanks Bigal; inbox cleaned up (enough), fire away! LoL Cheers Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.