[编程申请]：高手们请看看能否写出这样的程序？（要实现这种功能可能用ARX或者是VBA）

MY-Edwin

老大下面的程序怎么写啊？
                       按住“Ctri”键不放开用鼠标左键框选视窗就能对选中的区域实现放大（即口缩放）
                        按住“Ctri”键不放点鼠标中键就能实现全屏幕显示窗口中的图形（即，ZOOM，ALL）
                       按住“Ctri”键不放点鼠标点鼠标右键就能实现显示上一次显示的内容（即：ZOOM ，P）

Free-Lancer

太费劲了吧

panzhongw

对呀！你这种作法实不可取，推荐如下：
(defun c:Zz()
  (command "ZOOM" "p")
  (PRINC)
)
按以上模式，把你所想的快捷方式写在同一个LSP文件中，把此LSP放到启动组中。注意键名的设置不要和其他外挂软件的名字重复。

xyp1964

累：
1. 用3D鼠标滚轮。
2. 3还是用左手，少抽点烟吧！呵呵……
[php]
(DEFUN C:ZA () (COMMAND "ZOOM" "A"))
(DEFUN C:ZC () (COMMAND "ZOOM" "C"))
(DEFUN C:ZD () (COMMAND "ZOOM" "D"))
(DEFUN C:ZE () (COMMAND "ZOOM" "E"))
(DEFUN C:ZL () (COMMAND "ZOOM" "L"))
(DEFUN C:ZP () (COMMAND "ZOOM" "P"))
(DEFUN C:ZW () (COMMAND "ZOOM" "W"))
[/php]

sdwy19691229

我好象在我们论坛上，发现一个R14 可用的滚轮程序。
就有楼主想要的功能。

xyp1964

还是（也许）用2004吧，如果偶还停留在R12，就没法交流了，“老牛犁地”的时代应该过去了，……

MY-Edwin

很感谢各位朋友的热心帮助；
  你们提到的方法我也知道的，不过我任然很感谢你们，
  我门公司所使用的CAD还是R14的不过很好用，所以至今还没准备升级，
  我上面提到的问题他在我们公司的CAD上有，不过程序编译过的，所以无法开，
  我上面问的问题他在2000以上版本上任然很有用的，
  他可以大大地提高CAD用户的绘图速度，
  不只到各位朋友能否告诉我-------第一楼的问题怎么写
  本人感激不尽

urljit

关键是要知道是什么控制回调 ctrl＋鼠标键

sjylzf

恐怕不行

它山之石

我上面提到的问题他在我们公司的CAD上有，不过程序编译过的，所以无法开，


也许你把你的程序与大家共享，会有高手帮你反编译的，也未可知。

MY-Edwin

我可以提供很多开发过的CAD专家系统，

fools

如果不是当透明命令用，楼主的要求还是不难实现的
要是当透明命令用，那就已经超出我的能力范围罗

liuyj

大家还记得李国杰大侠写的asdehk吗？用r14的时候简直离不开它，可以部分实现楼主的想法，即按住alt左键框选放大，中键单击、双击、平移，极为实用，可惜仅有r14和200x版。

fylinwater

我arx用hook初步尝试了一下，可以实现，但是效果不是很好，估计还要处理写其他东西

MY-Edwin

很感谢各位朋友地支持
          很希望12楼和14楼的朋友能把你们的解决方法上传上来，
          说不定本人和其他朋友能得到启发，
12楼朋友所说的不是透明命令，但是可以给看图（审核）带来很大的方便，