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

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

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

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

(defun c:1 (/ v)<br/>&nbsp; (if (= (logand (setq v (getvar "pickstyle")) 1) 1)<br/>&nbsp;&nbsp;&nbsp; (progn (setvar "pickstyle" (1- v)) (princ "&lt;编组 开&gt;"))<br/>&nbsp;&nbsp;&nbsp; (progn (setvar "pickstyle" (1+ v)) (princ "&lt;编组 关&gt;"))<br/>&nbsp; )<br/>&nbsp; (princ)<br/>)

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

谢谢<strong><font face="Verdana" color="#61b713">caoyin</font></strong>

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

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

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

highflybir发表于2008-8-8 13:33:00static/image/common/back.gif本来还有一个快捷键的Ctrl+H

<p></p><p>手太小，按不了那么远的键</p><p>呵呵</p>

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

这么精悍。简短。高手

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

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