[求助]：关于XDATA的更新问题

panzhongw · 发表于 2004-8-26 14:38:07

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

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

×

我想更新物体的XDATA，使用如下语句
(setq dl (entget (car (entsel)) '("*")))
(setq dlx (assoc -3 dl))
(entmod (subst xd1 dlx dl));;XD1为新的-3表
但有时返回的表还包含了原来的-3表的内容，不知为何？

aidraft · 发表于 2004-8-26 15:17:09

(entmod (setq dl (subst xd1 dlx dl))) ???

panzhongw · 发表于 2004-8-26 22:42:20

上面的语句有变化吗？

aidraft · 发表于 2004-8-26 23:01:20

不变，试试便知

zhang8755 · 发表于 2004-8-27 08:17:17

仔细检查XD1表的格式,是不是不符合要求,如果XD1表的格式不对,旧表不会被替换.

aidraft · 发表于 2004-8-27 09:04:11

You are right

panzhongw · 发表于 2004-8-27 14:01:41

(-3 ("gangshu_a1" (1000 . "1") (1002 . "{") (1070 . 1) (1070 . 1) (1040 .
700.0) (1040 . 1367.1) (1040 . 2.0) (1002 . "}")) ("startmj_1" (1000 . "1")
(1002 . "{") (1070 . 1) (1002 . "}")) ("endmj_1" (1000 . "1") (1002 . "{")
(1070 . 1) (1002 . "}")) ("lianjmj" (1000 . "0") (1002 . "{") (1070 . 0) (1002
. "}")))
以上是XD1的值
(-3 ("gangshu_1" (1000 . "1") (1002 . "{") (1070 . 1) (1070 . 1) (1040 . 700.0)
(1040 . 1367.1) (1040 . 2.0) (1002 . "}")) ("gangshu_a1" (1000 . "1") (1002 .
"{") (1070 . 1) (1070 . 1) (1040 . 700.0) (1040 . 1367.1) (1040 . 2.0) (1002 .
"}")) ("startmj_1" (1000 . "1") (1002 . "{") (1070 . 1) (1002 . "}"))
("endmj_1" (1000 . "1") (1002 . "{") (1070 . 1) (1002 . "}")) ("lianjmj" (1000
. "0") (1002 . "{") (1070 . 0) (1002 . "}")))
以上是用(entmod (subst xd1 dlx dl))后返回表中的-3表
可以看出ENTMOD没有将原-3表清除“干净”。
同时我也试用了先(setq dl (subst xd1 dlx dl))再(entmod dl)，同样会出现以上问题。
而且此问题是在使用ENTMOD的第二次时出现的，即最初的生成和第一次修改都没问题。

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

[求助] [求助]：关于XDATA的更新问题

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子