arches9 发表于 2016-3-22 02:12:19

使用ssget和ssname后修改文字出现错误

本帖最后由 arches9 于 2016-3-22 02:14 编辑

我是菜鸟,看了一个简易教程是这样的
(setq en3 (entsel))
(setq en3_data (entget (car en3)))
(setq oldr (assoc 1 en3_data))
setq newr (cons 1 “文字”))
(setq en3_data (subst newr oldr en3_data))
(entmod en3_data)
这样写是成功的,然后我使用ssget获得文字选择集,再用ssname去一一获取文字,但是出现:参数类型错误 lentityp <图元:******>
不太明白是哪里的问题,我在程序里跑了下(setq en3 (entsel))(princ en3),发现是获取的图元名和文字的坐标,但是现在我用选择集,也要一一获取文字后使用assoc确定坐标,现在超级疑惑的,希望有好心人帮忙解答,谢谢
                        
               

ZZXXQQ 发表于 2016-3-22 08:51:39

;...
(setq ss (ssget '((0 . "TEXT"))))
(setq newr (cons 1 "文字"))
(repeat (setq i (sslength ss))
(setq ent (entget (ssname ss (setq i (1- i)))))
(entmod (subst newr (assoc 1 ent) ent))
)
;...
页: [1]
查看完整版本: 使用ssget和ssname后修改文字出现错误