Hi all , I had done this code , to get all the objects propierties of each entity of a drawing
;; TO GET ALL THE object's propierties ON A DRAWING
(defun get-object ()
(setq et (entnext))
(while et
(SETQ objet-name (vlax-ename->vla-object et))
;;(prin1 objet-name)
(setq object-propierties (vlax-dump-object objet-name ) )
(prin1 object-propierties)
(terpri)
(setq et (entnext et))
)
)
(get-object)
But this line does not PRIN1 the object propierty
(prin1 object-propierties)
At the HELP this is stated
Note that vlax-dump-object displays the information in the window from which you issued the command. However, the function returns T to the calling program, not the information displayed in the Command window.
My question , there is any way I can print or save in a file such OBJECTS-PROPIERTIES?