选择所有具有

alanjt · 发表于 2022-7-6 09:04:23

wimal · 发表于 2022-7-6 09:05:48

谢谢你提供的所有信息。
但我找不到在命令提示符下使用QSELECT命令的方法
它总是转到对话框：（。

tzframpton · 发表于 2022-7-6 09:09:07

过滤器是更好的选择，对吗？这样一来，海报就可以使用选择框，此外，还可以保存选择过滤器。

这让我想起了el oh el。

alanjt · 发表于 2022-7-6 09:12:33

让我见鬼去吧。

wimal · 发表于 2022-7-6 09:15:05

即使filter命令也无法与命令提示符一起使用。
因此，我无法从lisp代码中输入数据进行计算。
这就是为什么我问了一些lisp代码。
谢谢大家。

Tharwat · 发表于 2022-7-6 09:17:47

做了什么？

wimal · 发表于 2022-7-6 09:20:37

我尝试按以下方式输入变量而不是值100，但失败了。原因是什么

copy

(setq [b][color=red]ht 100[/color][/b])(setq ss (ssget "_:L" '((0 . "TEXT,MTEXT") (40 . [b][color=red]ht[/color][/b]))))

copy

;;Originally Posted by Tharwat
(defun c:TesT (/ sc ss i sn)   ;;; Tharwat 13. Dec. 2011 ;;;   (if (and (setq sc (getdist "\n Specify new height :"))            (setq ss (ssget "_:L" '((0 . "TEXT,MTEXT") (40 . [color=red][b]100[/b][/color]))))       )     (repeat (setq i (sslength ss))              (setq sn (ssname ss (setq i (1- i))))              (entmod (subst (cons 40 sc) (assoc 40 (entget sn))(entget sn)))     )     (princ)   )   (princ)

Tharwat · 发表于 2022-7-6 09:25:50

这边

copy

(setq ht 100)
(setq ss (ssget "_:L" (list '(0 . "TEXT,MTEXT") (cons 40 ht))))

wimal · 发表于 2022-7-6 09:29:12

谢谢，它起作用了。

Tharwat · 发表于 2022-7-6 09:29:53

很高兴听到这个消息。

祝你好运

[编程交流] 选择所有具有

发表回复

精选推荐