【转帖】[讨论]
 

[讨论]
www.dimcax.com
[讨论]
大家帮忙看一下这段程序有什么毛病
我想把一个图形里的内个布局的打印设置更改一下
组码 74 是打印范围 7 是打印样式
运行后有下边这样的提示
"; 错误: 参数类型错误: stringp (74 . 5)"
(defun c:dy (/ layoutdxf i ent)
(setq layoutdxf (dictsearch (namedobjdict) "acad_layout")
i 11
)
(repeat (/ (- (length layoutdxf) 12) 2)
(setq ent (entget (cdr (nth (setq i (+ 2 i)) layoutdxf)))
ent (substr (cons 74 5) (assoc 74 ent) ent)
ent (substr (cons 7 "mc.ctb") (assoc 7 ent) ent)
)
(entmod ent)
)
)
【点评】 3年多的老会员了，不应该发这种没有写清标题的贴子。 [mccad |
d