So, in the example above, do you even need to set the "acad", "thisDrawing"
and "modelspace" variables? I don't see where they are used...
"James Buzbee" wrote in message
news:5699242@discussion.autodesk.com...
(defun c:ChangeWall (/ wallobj p1 p2)
(setq acad (vlax-get-acad-object)
thisDrawing (vlax-get acad "activedocument")
modelspace (vlax-get thisDrawing "modelspace"))
(setq wallobj (vlax-ename->vla-object (car (entsel "\nSelect a Wall: ")))
p1 (getpoint "\nWall start point: ")
p2 (getpoint "\nWall end point: ")
)
(vlax-put wallobj 'startpoint p1)
(vlax-put wallobj 'endpoint p2)
(princ)
)
Not as difficult as you thought: vlax-put accepts care lisp data types:
strings, lists, reals, etc. So just use the values returned by getpoint!