[求助]：如何把对象名字符化

柔柔 · 发表于 2005-10-27 08:31:30

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

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

×

我要把布局内的视口全部归到视口层去，这本来没问题。

没想到一旦视口被剪裁，或者由对象转为视口，实际上除视口外多了个关联对象，我也要把它归到视口层。

看数据列表，挺有规律的，可是对象是对象，其名不能字符化，也就不能作比较，请各位出出主意如何解决。

舟自横 · 发表于 2005-10-27 10:06:10

参考(vl-princ-to-string (assoc -1 (entget(car(entsel)))))

eachy · 发表于 2005-10-27 12:15:09

用 handle

狂刀 · 发表于 2005-10-27 13:30:20

可是对象是对象，其名不能字符化，也就不能作比较

你是要作怎样的比较?

柔柔 · 发表于 2005-10-27 18:22:36

看我的贴图，从视口对象的340可以获取<图元名:7ef7a170>，这个是字符，从剪裁视口生成的关联对象的-1也能获取<图元名:7ef7a170>，比较二者相同，就找到了这个对象，也就能把它放进视口图层内，可惜通过-1获取的这个跟340一模一样的<图元名:7ef7a170>它并不是字符，而是对象，对象与字符不能比较。

2、3楼的方法我去试验一下，如果成功，则解决了大问题。

我在这么一个程序内要用到这个，那是自动处理图形文件的程序，根据对象特性分别把它们归到相应图层内，并把颜色线型都随层。而布局内的视口除了归到视口层VIEW外，还要将其图层设成不打印层，以免最后忘了关闭图层被客户打印出视口线（编辑图形时不便关闭）。

eachy · 发表于 2005-10-27 18:34:28

handle 和 ObjectID 一样都是唯一的。

柔柔 · 发表于 2005-10-27 20:38:22

问题得到解决，谢谢各位

狂刀 · 发表于 2005-10-27 20:42:02

为什么要用字符比较呢?直接比较实体名不行么?
(eq (cdr (assoc 340 (entget viewportename)))
(car(entsel))
)

;; 将viewport联接的实体转到 "viewport" 层
(defun c:ttt ()
(setq vps (ssget "x" '((0 . "VIEWPORT")))
i -1)
(while (setq e (ssname vps (setq i(1+ i))))
(if (setq ee (cdr(assoc 340 (entget e))))
(entmod (subst (cons 8 "viewport")(assoc 8 ent) (entget ee)))
)
)

柔柔 · 发表于 2005-10-27 20:49:01

刚才修改时才发现，原来我搞错了，以为340获得的是字符，其实也是实体名，也即二者是同一类型，用eq完全可以。

xyp1964 · 发表于 2005-10-27 20:58:18

把视口改成defpoints层就不用考虑打印出问题了。

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

[求助] [求助]：如何把对象名字符化

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

相关帖子