层操作
$$ 层名 最好不要用中文删除麻烦 描述用中文不影响
$$ &wlayer 设置或获得工作层
&wlayer=1
print/&wlayer
$$ 获得 对象的所属层
&layer(obj)
$$ 把对象移到第256层
&layer(obj)=256
$$ 改变工作层为 第20层
layer/work,20
layer/work,20,inact,rest $$ 改变工作层为 第20层 其它层不可见
layer/active,1 $$ 第1层 可见,可选择。
layer/ref,1 $$ 第1层 可见的,但不是可选择。
layer/inact,1..256 $$ 第1..256层 不可见也不可选择
$$ 判断某层 是否可见 或 设置是否可见
$$
$$ &lyrvis(层号)=数字
$$
$$ 1 = &yes (层是可见的)
$$ 2 = &no (层是不可见的)
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
在视图层的可见性
&LYRVVW('view name',layer number[,IFERR,label:])
1 = &YES (layer is visible)
2 = &NO (layer is not visible)
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
创建层组有名称描述可以中文
CAT/'name'[,layer list][,CAT,'cat list'][,DESCR,'description'][,IFERR,label:]
列:
cat/'ycp',9,descr,'源产品'
cat/'a-d',10..50,descr,'动模组'
cat/'a-j',60..80,descr,'静模组'
halt
根据输入的层名name 获得层组 和 层描述
CATV/'name'[,LAYER,layers,CNT,count][,DESCR,'description'][,IFERR,label:]
编辑层类别
CATE/'name'{,ADD|,REMOVE}[,layer list][,CAT,'cat list'][,DESCR,'description'][,IFERR,label:]
删除层名
CATD/'层名'[,IFERR,label:]
批量删除删除层名
图层名称不能删除
移除图层里面的东西
图层会自己消失
$$循环获得所有层名称,并删除
string/catig(80)
inextn/12
l10:
catig=nextn/ifend,end:
if/catig=='All',jump/l10:
catd/catig,IFERR,l10:
jump/l10:
end:
messg/'删除完毕!'
halt
_____________________________________________________________________________ _
中磊UG二次开发教程 梅雷著 qq1821117007
学UG就上UG网 http://www.9sug.com/
|