Message 1 of 28
AEC Objects & LISP
Not applicable
04-30-2009
10:02 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Anyone know how to get into the AEC objects (Civil 3D & Architecture) with LISP? I am trying to get into the AEC Drawing setup info using vlax functions in lisp. The following doesn't work, but I hope it will illustrate what I am trying to do.
Any help appreciated,
tom
(defun c:getaec ( / acad_app aec_app aec_doc aec_pref temp_lu)
(setq acad_app (vlax-get-acad-object))
(setq aec_app (vlax-invoke-method acad_app 'GetInterfaceObject "AecBase.Application"))
(setq aec_doc (vlax-get-property aec_app 'AecBaseDocument))
(setq aec_pref (vlax-get-property aec_doc 'AecBaseDatabasePreferences))
(setq temp_lu (vlax-get-property aec_pref 'LinearUnit))
(print temp_lu)
)
Any help appreciated,
tom
(defun c:getaec ( / acad_app aec_app aec_doc aec_pref temp_lu)
(setq acad_app (vlax-get-acad-object))
(setq aec_app (vlax-invoke-method acad_app 'GetInterfaceObject "AecBase.Application"))
(setq aec_doc (vlax-get-property aec_app 'AecBaseDocument))
(setq aec_pref (vlax-get-property aec_doc 'AecBaseDatabasePreferences))
(setq temp_lu (vlax-get-property aec_pref 'LinearUnit))
(print temp_lu)
)
