呵呵，楼盖得真快！三天时间就超过了50楼。
我都还没来得及整理。。。
不过一言既出，驷马难追。 等下我整理好了就贴出来。。
这些功能对LISP是大补充呀。
很好用，谢谢！
highflybird 发表于 2011-11-20 10:44 static/image/common/back.gif
呵呵，楼盖得真快！三天时间就超过了50楼。
我都还没来得及整理。。。
不过一言既出，驷马难追。 等下我整 ...
嘿嘿，好东西当然盖楼比较快
本帖最后由 highflybir 于 2011-11-21 10:39 编辑
现在版本更新，请大家重新下载，并请反馈测试结果。
现在R2000-2002版本可用。
R14版本及其以下版本，我无法编译。所以这个程序最低CAD版本是R2000.
等到测试所有版本都能成功加载并正确运行后，我把我的源码贴在ObjectARX版块。请大家耐心等待。
后面跟帖的请报告CAD版本，32位或者64位，各个函数的运行是否正常，以方便我改进。
brainstorm :楼主的函数能够捕获键盘输入信息么 比如是按了那个字母 这样就可以定义cad的热键了
考虑在下个版本增加钩子和定时器事件。
本帖最后由 Gu_xl 于 2011-11-21 14:33 编辑
highflybir 发表于 2011-11-21 10:20 http://bbs.mjtd.com/static/image/common/back.gif
现在版本更新，请大家重新下载，并请反馈测试结果。
现在R2000-2002版本可用。
2002、2004、2008测试成功！晚上回家再测试一下64位的2010，不过退出cad时总出现如下提示：
我做了一个图档关闭反应器：
;;;添加图档监视反应器
(or *Vlr_HFB_PointMonitor*
(setq *Vlr_HFB_PointMonitor* (VLR-dwg-Reactor nil '((:VLR-beginClose . HFB_PointMonitor_close))))
)
;;;回调函数
(defun HFB_PointMonitor_close (reactor_object data)
(HFB_PointMonitor)
)
有时退出cad时不上出现述提示，有时退出时就出现上述提示！能分析下原因么？
Gu_xl 发表于 2011-11-21 14:31 static/image/common/back.gif
2002、2004、2008测试成功！晚上回家再测试一下64位的2010，不过退出cad时总出现如下提示：
我做了一 ...
如果你的有活动的没卸载干净的话，就需要手动卸载。否则有可能引起崩溃。故提醒。
Gu_xl只打开一个文档，手工用(HFB_PointMonitor)关闭后，退出CAD依然会出现提示！
现在已经解决了这个问题。请下载重新测试。无需加反应器，现在关闭文件时可以自动关闭事件。
楼主 SSJIG 的关键字 如果用户输入了关键字 能不用回车就直接接受关键字么 可以设个选项需要回车确认或者不需要
很多软件在命令过程中支持关键字热键
很期待这个功能
用(hfb_pointmonitor)关闭了 问题依旧 cad2012 32位