明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 56295|回复: 514

[资源] [转贴]防止捕捉丢失 By free-Lancer

  [复制链接]
发表于 2013-9-13 10:16 | 显示全部楼层 |阅读模式
本帖最后由 自贡黄明儒 于 2013-9-13 10:18 编辑

由于原来的程序写得不好,或者Esc取消的缘故,造成捕捉丢失,我一直在寻求一种方法而未果。
如果是使用别人的vlx造成的,改也没得改,今天终于看到free-Lancer的程序,故急于与大家分享
;;*************防止lisp程序改变捕捉 By free-Lancer
;;http://www.xdcad.net/forum/thread-670615-1-1.html
(setq HH:Osmode (getvar "osmode"))
(defun HH:resetosmode (v1 v2)
  (if (/= (getvar "osmode") HH:Osmode)
    (setvar "osmode" HH:Osmode)
  )
  (princ)
)
(vlr-editor-reactor
  nil
  '((:vlr-lispEnded . HH:ResetOsmode)
    (:vlr-lispCancelled . HH:ResetOsmode)
   )
)
;;*************防止lisp程序改变捕捉 By free-Lancer

点评

具体怎么使用,写个说明。。。。。  发表于 2018-11-6 18:41

评分

参与人数 1明经币 +1 收起 理由
wayne_myles + 1

查看全部评分

"觉得好,就打赏"
还没有人打赏,支持一下

本帖被以下淘专辑推荐:

发表于 2020-8-27 09:13 来自手机 | 显示全部楼层
lisp爱好者 发表于 2013-9-13 10:49
黄兄:偶没明白怎么使用,烦请赐教

(setq HH:Osmode (getvar "osmode"));;这个放在程序中最前

怎么用呀  大神指点一下
发表于 2018-7-13 13:27 | 显示全部楼层
在命令的时候 ESC中断 就会改变 这个一直不知道怎么解决 来学习学习
发表于 2017-11-9 22:19 | 显示全部楼层
我的也是  有的插件没有执行完按ESC捕捉就没有了
发表于 2013-9-13 10:17 | 显示全部楼层
怎么会丢失呢?
发表于 2013-9-13 10:18 | 显示全部楼层
程序没考虑,改变了你原来的设置
发表于 2013-9-13 10:19 | 显示全部楼层
中断后没有恢复环境?看一下,学习

点评

看到的不是程序,而是智慧  发表于 2013-9-13 10:32
发表于 2013-9-13 10:27 | 显示全部楼层
程序运行过程中用户退出或其他原因造成的出错,看看恢复
发表于 2013-9-13 10:28 | 显示全部楼层
不回复不能看啊,还是回复下好啦!
发表于 2013-9-13 10:29 | 显示全部楼层
本帖最后由 wangph 于 2013-9-13 10:33 编辑

其实用entmake是个好方法,缺点是它不能代替所有的操作
发表于 2013-9-13 10:32 | 显示全部楼层
路过。看看是什么好东东
发表于 2013-9-13 10:35 | 显示全部楼层
kkkkkkkkkkkkkkkkkkkkkkkkkkkkk
发表于 2013-9-13 10:35 | 显示全部楼层
回复用以学习
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-4-27 08:41 , Processed in 0.214005 second(s), 34 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表