查看单个帖子
旧 2009-04-26, 03:16 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 [讨论] lisp 控制鼠标移动和点击

[讨论] lisp 控制鼠标移动和点击
www.dimcax.com
[讨论] lisp 控制鼠标移动和点击
既然lisp控制键盘没问题 也应该可以控制鼠标才对
但是需要借助第三方控件(vb调用api封装类我还不会 以后慢慢研究)
首先解压下面的压缩包把3个文件拷贝到 c:\windows\system32\ 里面
请使用winrar或winzip软件打开zip压缩文件。
然后运行下面的代码即可
;by nonsmall
原创加密lisp真正的破解.原创lisp操作cad内置对话框.原创lisp直接调用win32 api.原创lisp开发小助手(代码自动生成器).原创vba语句->lisp语句解释器.原创lisp音乐播放器.原创lisp直接使用vba对话框.
(setq wsh (vlax-create-object "wscript.shell"))
(setq text "cmd /c regsvr32 /s qmdispatch.dll")
(vlax-invoke wsh 'run text 0)
这几句直接用
(startapp "regsvr32" "/s qmdispatch.dll")不就行了吗,也许是我见识浅薄,不知道老猫写三行是不是有特殊之处.
小学的时候老师在台上讲“帅”的含义, 我听不懂,同桌的女孩红着脸递给我一面 镜子,那一霎那,我明白了。
d
运行和注册是两回事
d
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)