求助!!!!请教高手得到文本参数的问题？？

xfy5216

请教高手


以下语句除了“ent” 得到了图元名外，其余“zf”“zg” “len” 均为nil 为什么呀!


(setq ent (car (nentsel "\n请选择文本:")))


(setq zf (cdr (assoc 1 (entget (ent))))); 提取文本得字符


(setq zg (cdr (assoc 40 (entget (ent)))));提取字符得字高


(setq len (strlen zf));文本字符串的长度


_____________________


                                        我爱CAD                                                                                                                                                                                                                                                                                         成长中的菜鸟

alin

(setq ent (car (nentsel "\n请选择文本:"))) (setq zf (cdr (assoc 1 (entget ent)))); 提取文本得字符 (setq zg (cdr (assoc 40 (entget ent))));提取字符得字高 (setq len (strlen zf));文本字符串的长度

xfy5216

谢谢版主!!


原来我多加了一个括号呀! 括号的作用还不小!


________________________________


                                        我爱CAD                                                                                                        成长中的菜鸟：)