CAD开发者社区 › 首页 ›AutoCAD开发文档› AutoCAD 2019 开发者帮助 › 查看内容

AutoCAD 2019 开发者帮助

ObjectAdded 事件（ActiveX）

2024-5-18 17:53| 发布者: admin| 查看: 116| 评论: 0|原作者: admin|来自: AutoCAD

在将对象添加到图形时触发。

支持的平台：仅限 Windows

签名

VBA：

object.ObjectAdded(Entity)

对象

类别： 文档

计算结果为有效容器对象的对象表达式。在这种情况下，唯一有效的容器是文档。

实体

类型：绘图对象;输入到处理程序

添加到图形中的对象。它可以是任何一个绘图对象。

言论

显示模式对话框时不会触发任何事件。

例子

VBA：

Private Sub AcadDocument_ObjectAdded(ByVal Object As Object)
    ' This example intercepts a drawing ObjectAdded event.
    '
    ' This event is triggered when an object is added to a drawing.
    '
    ' To trigger this example event: Add an object to an open drawing

    ' Use the "Object" variable to determine the type of object added
    MsgBox "A " & TypeName(Object) & " was just added to the drawing!"
End Sub

可视化 LISP：