samifox 发表于 2022-7-5 19:44:11

Texteval系统可验证

你好
 
Autolisp用户指南说：
 
 
该系统可验证如下：
 
通过执行
 
(command "circle" "5,5" pause "line" "5,5" "7,5" "")

 
将TEXTEVAL设置为0或1时，Autocad将暂停输入。
 
知道为什么吗？
 
谢谢

Lee Mac 发表于 2022-7-5 20:05:38

根据帖子中的信息，TEXTEVAL系统变量似乎只影响TEXT或-TEXT命令的行为。

samifox 发表于 2022-7-5 20:19:13

 
我玩了一会儿。
你说得对，李。它只影响text命令。如果TEXTEVAL设置为0，文字“PAUSE”将打印在text对象上。但它被阻止了。
 
另一件我无法解决的事情，他们会这样说：
 
 
但如果我真的需要窗口选择对象呢？假设我想将几个对象从屏幕点a移到屏幕点b，我该如何编码？
(command "move" pause pause "")
 
行不通：否：

tombu 发表于 2022-7-5 20:29:48

(command "move")(while(= "LINE" (getvar 'CMDNAMES)) pause)

Lee Mac 发表于 2022-7-5 20:35:38

 
我建议：
(if (setq s (ssget "_:L"))
   (command "_.move" s "" "\\" "\\")
)

BIGAL 发表于 2022-7-5 20:45:46

也可以移动P“”，但必须预先选择对象。如果是简单的lisp，则可以。
页: [1]
查看完整版本: Texteval系统可验证