一个图层问题，困扰我很久了，请帮忙

LIHUISHUAN · 发表于 2004-7-20 10:08:00

我通过程序"mlayer"设置了几个图层比如： (command "-layer" "n" "3尺寸线" "c" 3 "3尺寸线" "l" "continuous" "3尺寸线"
"lw" 0.15 "3尺寸线" "" )设置了层“3尺寸线” 我在其他程序中需要使用“3尺寸线”，比如：(SETVAR "CLAYER" "3尺寸线") 问题在于我不知此时是否加载了“mlayer”，此时是否存在“3尺寸线”，如果没有程序就会出错，可否在使用前检查该图层是否存在，如不存在就加载“mlayer”请教如何实现！谢谢！

ZZXXQQ · 发表于 2004-7-20 10:17:00

您可以这样使用：

（COMMAND "-LAYER" "M" "3尺寸线" "")

这样如果设置了图层就转到该图层，如果未设置，就设置并转到该图层。

LIHUISHUAN · 发表于 2004-7-20 10:23:00

zzxxqq:

您这个方法或许不是正解，因为“3尺寸线”还包括颜色、线形、线宽等信息，一起重新设置一遍，并不是我想要的。谢谢您！

meflying · 发表于 2004-7-20 10:30:00

(command "-layer" "n" "3尺寸线" "c" 3 "3尺寸线" "l" "continuous" "3尺寸线" "lw" 0.15 "3尺寸线" "s" "3尺寸线" "")

LIHUISHUAN · 发表于 2004-7-20 10:38:00

飞哥您好：

如果原先这个图层就存在，还必须重新生成一遍吗？

meflying · 发表于 2004-7-20 10:41:00

写了这么多程序，判断一下应该会吧 (if (tblsearch "layer" "3尺寸线")
(setvar "clayer" "3尺寸线")
(command "-layer" "n" "3尺寸线" "c" 3 "3尺寸线" "l" "continuous" "3尺寸线" "lw" 0.15 "3尺寸线" "s" "3尺寸线" "")
)

LIHUISHUAN · 发表于 2004-7-20 10:49:00

实在不好意思，我虽然编过一点程序，但水平还是很低，让您见笑了！

说实话，这个问题我困扰了很久，又觉得应该比较简单，险些不好意思拿出来问您！

不管怎莫说，还是感谢您的帮助！

wyj_007 · 发表于 2004-7-30 17:16:00

..................

(setq clayer0 (getvar "clayer" ))

(command "LAYER" "M" "3尺寸线" "")

......................

(setvar "clayer" clayer0)

..............

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