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

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

这个好用,感谢分享

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

发表回复

精选推荐