|
请问:在中下面为什么会有问题:
sset = ac.SelectionSets.Add("SS1")
gpCode:= VarArrayCreate([0, 1], varvariant);
dataValue:=VarArrayCreate([0, 1], varvariant);
//'直线过滤器
gpCode[0] = 0 ;
dataValue[0] = 'LINE' ;
//'图层过滤器
gpCode[1] := 8 ;
dataValue[1]:= '7' ;
FilterType := gpCode ;
FilterData := dataValue ;
//' 添加至选择集中,在选择过程中进行过滤
//' 完成选择后按回车。
sset.SelectOnScreen(FilterType, FilterData);
//' 在选择集中循环并将每一已合条件的对象颜色更改为蓝色。
。。。。。。。。 |
|