xhshine 发表于 2011-6-20 19:40:55

错误: 参数类型错误: lentityp nil

下面一个函数为输出带属性块儿的属性值,在有些地方运行不会出现错误:;可有时候会出现:更改请输入<1>,空格接受默认值<DN; 错误: 参数类型错误: lentityp nil,不知道什么原因,请朋友帮忙!

(defun alluse6()



(princ "更改请输入<1>,空格接受默认值<DN")
(setq this_list(entget (entnext (entlast))))
(princ (cdr (assoc 1 this_list)))
(princ ">")
(princ)
(setq attsell(getint))
(if(= attsell 1) (command "eattedit" (entlast) ""));打开最后一个属性块的增强属性编辑器




(setq lst (entget (entnext (entlast))))
(setq s(assoc 1 lst))
(setq step(+ step 1))






)

ZZXXQQ 发表于 2011-6-20 20:13:13

(setq this_list (entget (entnext (entlast))))
上句中(entlast)已经是最后的实体了,用entnext只能返回nil。所以entget出错。
页: [1]
查看完整版本: 错误: 参数类型错误: lentityp nil