【求助】板王这种空格设置怎么实现的？

forthe213lc

【求助】板王这种空格设置怎么实现的？

Bao_lai

1. ;利用回车或者空格来控制设置
   
2.         (defun C:TT()
   
3.         (princ "\n请选择对象<空格或者回车设置>：")
   
4.         (while (= nil ss)
   
5.                 (setq ss (ssget  (list '(0 . "text")(cons 8 "text"))))
   
6.                 (if (= nil ss) (alert "调用设置模块！") (alert "选择了对象并进行后续操作！"))
   
7.         )
   
8.         )

;利用回车或者空格来控制设置<br />         (defun C:TT()<br />         (princ "\n请选择对象<空格或者回车设置>：")<br />         (while (= nil ss)<br />                 (setq ss (ssget  (list '(0 . "text")(cons 8 "text"))))<br />                 (if (= nil ss) (alert "调用设置模块！") (alert "选择了对象并进行后续操作！"))<br />         )<br />         )

forthe213lc

Bao_lai 发表于 2019-6-26 23:47

谢谢，，可以安心睡觉了。

cghdy

Bao_lai 发表于 2019-6-26 23:47

你好，请问除了回车和空格，有没有办法通过输入特殊字符（例如S）来进入设置的

Bao_lai

如果要带关键字，也就是你所说的特殊字符，可以明经一下 “Fsxm-ssget”试试看，有你想要的答案。