|
问题:
2004中能够响应鼠标滚轴事件而实时动态缩放图形(当然R14也有相应的补丁程序),
我现在需要实现的功能是在AutoCAD2004鼠标滚轴事件中增加自己的代码,例如响应鼠标滚动
事件随时判断并显示或关闭一些图元等功能.
已经尝试过的方法:
1、利用API函数
获取thisdrawing.HWND、ThisDrawing.Application.HWND句柄
利用CallWindowProc、GetWindowLong、SetWindowLong、EnumChildWindows及回调函数增强窗口程序
发现向AutoCAD2004中窗口(thisdrawing.HWND、ThisDrawing.Application.HWND及其部分子窗口)发送
滚轴事件SendMessage(App_Hwnd, WM_MOUSEWHEEL, 0&, 0&)可以对CAD进行缩放.然而反过来,对这些窗口
程序的回调过程却反应停滞,也不能正常接收到WM_MOUSEWHEEL等消息!!!!最有希望的方法失败了!!!!
2、利用AutoCAD2004中VBA事件
在AutoCAD2004事件分为程序层事件、文档层事件和对象事件,我在问题中提到的功能初步判断可以通过
程序层(或文档层)的MOUSEWHEEL事件实现,或者通过acadviewport.Modified事件实现。但是在程序层
事件和文档层事件中只提供了BeginDoubleClick、BeginSave等事件,没有提供MOUSEWHEEL事件。本想
acadviewport.Modified可以最后依靠的,但后来发现该事件并不因为鼠标滚轴事件而触发,而是只在当前
视口发生变化等少数事件发生时才会触发。!!总之也是没成功!!
|
|