XIAOFEILONG 发表于 2008-8-7 00:48:00

[求助]对象编组的打开和关闭？

对象编组的打开和关闭，可以用ctrl+shift+A来控制，但是我觉得这个组合键不太方便（不小心会按错），我想能不能用lisp去实现编组的打开和关闭。
比如说，按一下“1”键，就是打开，再按第二次“1”键，就是关闭编组。
请问，要如何实现这个功能？

caoyin 发表于 2008-8-7 09:35:00

(defun c:1 (/ v)
(if (= (logand (setq v (getvar "pickstyle")) 1) 1)
    (progn (setvar "pickstyle" (1- v)) (princ ""))
    (progn (setvar "pickstyle" (1+ v)) (princ ""))
)
(princ)
)

XIAOFEILONG 发表于 2008-8-7 21:15:00

谢谢caoyin

highflybir 发表于 2008-8-8 13:33:00

本来还有一个快捷键的Ctrl+H

XIAOFEILONG 发表于 2008-8-8 18:26:00


手太小，按不了那么远的键
呵呵

434939575 发表于 2011-12-8 19:32:00

这么精悍。简短。高手

哥很帅也很温柔 发表于 2022-7-19 11:20:00

这个好用,感谢分享
页: [1]
查看完整版本: [求助]对象编组的打开和关闭？