关于使用 ActiveX 函数 （AutoLISP/ActiveX） 的过程

在本节中，您看到了使用 ActiveX 自动化在 AutoCAD 图形中绘制圆形对象的代码示例。使用了以下函数调用序列：

(vl-load-com)
(setq acadObject   (vlax-get-acad-object))
(setq acadDocument (vla-get-ActiveDocument acadObject))
(setq mSpace       (vla-get-ModelSpace acadDocument))
(setq mycircle     (vla-addCircle mSpace 
     (vlax-3d-point '(3.0 3.0 0.0)) 2.0))

此示例中的语句实现了以下操作：

• 加载了 AutoLISP ActiveX 支持函数。
• 返回指向 Application 对象的指针。
• 使用 Application 对象的属性获取指向当前活动 Document 对象的指针。这样就可以访问当前的AutoCAD图形。ActiveDocument
• 使用 Document 对象的属性获取指向 ModelSpace 对象的指针。ModelSpace
• 在 ModelSpace 中画了一个圆圈。

AutoCAD 对象模型中遍历的分层路径如下图所示：