Endshortcut menu 事件概述

Endshortcut menu 事件

快捷菜单出现后被击活。

用法：

Object.Activate()

Object: Document 对象

对象表达式，其结果为有效的容器对象，此处必须为文档对象（document）。

说明：

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

参见：

方法，属性和事件：

BeginShortcutMenuDefault

BeginShortcutMenuEdit

BeginShortcutMenuGrip

BeginShortcutMenuOsnap

BeginRightClick

Activex和VBA开发指导：

“使用事件”

Using Programming Languages other than VBA

例程:

Private Sub AcadDocument_Activate()

’本例演示快捷菜单事件的图形

’当用户关闭快捷菜单图形时,此事件被击活

’激活示例程序:将鼠标放在快捷菜单活动的区域上,单击右键

’等待快捷菜单被打开,然后再关闭

MsgBox "您刚才激活了一个图形！"

End Sub

Layout Switched 事件

用户转换一个不同的排列之后被激活

用法:

object.LayoutSwitched (Layout Name)

object: Document 对象

对象表达式，其结果为有效的容器对象，此处必须为文档对象（document）。

说明：

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

参见：

方法，属性和事件：

WindowChanged

WindowMovedOrResized

Activex和VBA开发指导：

“使用事件”

Using Programming Languages other than VBA

例程:

Private Sub AcadDocument_LayoutSwitched (By Val Layout Name as String)

’演示排列转换事件的图形

’当用户用了不同的排列时被激活

’激活示例程序:打开图形并改变排列

’例如:转换一个图形从模式到排列

’排列图表的多样性,我们可以选择自己需要的

MsgBox "您刚才激活了一个图形！"

End Sub

LISPCancelled 事件

当LISP 表达的评估被取消时被激活

用法:

object.LISPCancelled ()

object:

Application对象, Document 对象

对象表达式，其结果为有效的容器对象，此处必须为应用程序对象（application）或文档对象（document）。

说明：

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

参见：

方法，属性和事件：

BeginLISP

EndLISP

Activex和VBA开发指导：

“使用事件”

Using Programming Languages other than VBA

例程:

Private Sub AcadDocument_LispCancelled ()

’本例演示LISP取消的图形

'LISP表达的评估取消时被激活

’激活示例程序:操作LISP表达和取消LISP的评估在它完成之前

MsgBox "您刚才激活了一个图形！"

End Sub

Modified 事件

当对象和集合被修改时被激活。

用法：

object. Modified (Entity)

object:

All Drawing objects,Block,Blocks,Dictionary,Dictionaries,DimStyle,DimStyles,Group,Groups,Hyperlink,Hyperlinks,Layer,Layers,Layout,Layouts,Linetype,Linetypes,ModelSpace,PaperSpace,PlotConfiguration,PlotConfigurations,RegisteredApplication,RegisteredApplications,SelectionSet,SelectionSets,TextStyle,TextStyles,UCS,UCSs,View,Views,Viewport,Viewports,XRecord对象表达式，其结果为有效的容器对象。

说明：

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

参见：

方法，属性和事件：

ObjectAdded

ObjectErased

Activex和VBA开发指导：

“使用事件”

Using Programming Languages other than VBA

例程:

Public with Events Plane as AcadLWPolyline ' Use with Modified Event Example

Sub Example Modified ()

’在模式状态下本例创造了lightweight polyline 和涉及Polyline的使用在不同的场合建立相互的修改事件

’在修改事件中本例修改新的对象，激活代码

’修改对象激活事件

’提示：本事件代码将要被激活

’在们移动或重新修改背景之前，线不会变为蓝色当本例的信件箱被展现时

MsgBox "您刚才激活了一个图形！"

End Sub