|
法一，每次只能处理一条消息，而法二能够同时处理多条消息。 对于法二，声明如下： procedure WndProc(var Message: Tmessage);override 必须注意，使用时需要在处理完自己消息处理后继承WndProc(Message)函数，否则系统会崩溃！ 八、Word中Combo对话框的动态生成以及Change事件 建立类模块Combohander，在内部定义事件 Public WithEvents ComboBoxEvent As Office.CommandBarComboBox 定义Combo控件产生事件的模块 Dim ctlComboBoxHandler As New ComboBoxHandler 产生Combo对话框 Set Cbo_ChooseDoc = CommandBars("添加的菜单").Controls.Add(Type:=msoControlComboBox, Temporary:=True) 进行文件句柄设置，以产生Combo_Change事件 Set ctlComboBoxHandler.ComboBoxEvent = Cbo_ChooseDoc 产生事件后，在类模块Combohander内选择ComboBoxEvent的Change事件，即可书写事件代码 Sub ComboBoxEvent_Change(ByVal Ctrl As Office.CommandBarComboBox) 九、一些Word的事件 VBA代码中处理的Word事件有：Document_Close Application事件中需要处理的有：DocumentBeforeClose，DocumentChange。 Document_Close：事件在文档关闭时产生事件 DocumentBeforeClose：在文档被关闭以前先于Word判断文档是否保存，给出相应提示并进行相应处理。 DocumentChange：文档切换，在文档从自己修改的文稿和其他人修改的文稿之间切换产生事件，主要处理设置文档权限等 yzhshi@263.net |
正在阅读：Delphi与Word之间的融合技术Delphi与Word之间的融合技术
2004-02-14 09:34
出处：PConline
责任编辑：linjixiong
键盘也能翻页，试试“← →”键
