返回指定符号表中的所有元素

Free-Lancer · 发表于 2013-6-19 19:59:48

您需要登录才可以下载或查看，没有账号？立即注册

×

[ 本帖最后由 Free-Lancer 于 2013-6-19 20:01 编辑 ]\n\n

;;;功能返回指定符号表中的所有元素
;;;参数一个符号表名称"LAYER", "LTYPE", "VIEW", "STYLE", "BLOCK", "UCS", "APPID", "DIMSTYLE", and "VPORT".
;;;示例 (XD::SYM:table "block")
(defun XD::SYM:table (s / d r)
(while (setq d (tblnext s (null d)))
(setq r (cons (cdr (assoc 2 d)) r))
)
(vl-remove 'nil (acad_strlsort r))
)

GTJ116600 · 发表于 2013-7-17 09:27:11

这个函数有点意思

zhangq_cai1 · 发表于 2013-7-17 10:06:43

很有用~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~··

newer · 发表于 2013-7-17 10:22:45

zhangq_cai1 发表于 2013-7-17 10:06
很有用~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~··

别所有的帖子都是学习了，很有用。都是搞技术的，就没点技术含量吗，这样容易被扣分的。

zhangq_cai1 · 发表于 2013-7-17 10:32:17

谢谢提醒~~~~~~~~~~~~~~~~~~~~~~~~~~~~····

XMAN2013 · 发表于 2013-7-17 11:48:21

tblnext 这个函数我用过。。。怎么改的呢。

/db_自贡黄明儒_ · 发表于 2013-7-17 13:12:54

这个函数中(null d)用得妙

kkt123 · 发表于 2015-2-26 12:54:53

谢谢提醒3q3q

czcxxx_01 · 发表于 2015-9-5 15:14:18

很有用~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~··

hhq5085 · 发表于 2016-1-5 23:56:55

(null d) 决定了tblnext的返回形式，很巧妙

xinrstar · 发表于 2016-1-7 07:38:58

:):):):):):):):):):):)

账号		自动登录	找回密码
密码			立即注册

[符号表] 返回指定符号表中的所有元素