[讨论]

wwwbxd

大家帮忙看一下这段程序有什么毛病

我想把一个图形里的内个布局的打印设置更改一下

组码 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)
  )
)

wwwbxd

怎么光有人看没人说几句啊

Saging

substr是怎么用的?

这句错误是告诉你SUBSTR函数要标的是STRING类型，而你所提供的是点对。

正确的函数是SUBST，虽然只差一个字符，可用起来就大不一样。

wwwbxd

啊谢谢

记错了