关于CAD中鼠标滚轴事件响应，跪求明经高手指点

cppetonglei

问题：
AutoCAD2004中能够响应鼠标滚轴事件而实时动态缩放图形(当然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可以最后依靠的，但后来发现该事件并不因为鼠标滚轴事件而触发，而是只在当前
视口发生变化等少数事件发生时才会触发。!!总之也是没成功!!

 

pynet

我也正在考虑这个方面的问题！

不过现在还没有头绪！

wangjianning

你们说的我不懂

qjcpj

vb不行,试试vc吧.