giswater 发表于 2007-8-19 23:27:00

[求助]vba中怎样捕捉窗口缩放事件

<p>请问各位高手,我想实现当autocad窗口发生缩放时,执行一些操作,但怎么样可以捕捉窗口缩放事件阿,大家有好的解决方法没有?谢谢</p>

alin 发表于 2007-8-21 11:28:00

<p>高手在里面</p><p><a href="http://discussion.autodesk.com/thread.jspa?messageID=397263">http://discussion.autodesk.com/thread.jspa?messageID=397263</a></p>

giswater 发表于 2007-8-21 14:09:00

alin发表于2007-8-21 11:28:00static/image/common/back.gif高手在里面http://discussion.autodesk.com/thread.jspa?messageID=397263

<p>谢谢你,但里面讲的是一些事件的用法,而autocad没有提供缩放事件啊,请问你有什么好的方法没有</p>

alin 发表于 2007-8-22 07:45:00

你是说“当autocad窗口发生缩放“时,是指windowchanged事件吗?如果是的话,当然有

giswater 发表于 2007-8-22 22:23:00

alin发表于2007-8-22 7:45:00static/image/common/back.gif你是说“当autocad窗口发生缩放“时,是指windowchanged事件吗?如果是的话,当然有

windowchanged事件是指autocad窗口最大化,最小化,正常三种状态。而我说的是指autocad的放大、缩小事件。希望能继续得到你的帮助与建议,谢谢<p></p>

alin 发表于 2007-8-23 12:56:00

<p>问问题要讲清楚。"窗口缩放"的意思是 ZoomWindow, AutoCAD只有这种方法,而没有这个事件。考虑利用EndCommand事件是否能解决,至于捕捉鼠标滚轮引发的缩放和平移事件,可能只有ARX能办到了。</p><p></p>

wylong 发表于 2007-8-23 13:35:00

Private Sub AcadDocument_BeginCommand(ByVal CommandName As String)<br/>&nbsp;&nbsp;&nbsp; Select Case CommandName<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Case "ZOOM"<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '.... your program code here!<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Case Else<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; '.... your program code here!<br/>&nbsp;&nbsp;&nbsp; End Select<br/>End Sub<br/>

xxxtttxxx 发表于 2007-8-24 21:15:00

<p>VBA通过API函数不能构捕获滚轮的事件吗?</p><p></p>

alin 发表于 2007-8-24 21:40:00

<p>楼主是要窗口缩放事件</p>
页: [1]
查看完整版本: [求助]vba中怎样捕捉窗口缩放事件