catia二次开发源码分享：隐藏对象元素

admin

void HideElements(CATLISTV(CATISpecObject_var) ipListElemObj)
, G1 t! _* E1 |7 I1 j( \9 G{
# p# y1 k6 u' `  u- F  I    for(int i=1;i<=ipListElemObj.Size();i++){
        CATIVisProperties* pPropOnElem = NULL;
        HRESULT rc = ipListElemObj[i]->QueryInterface(IID_CATIVisProperties,
            (void**)&pPropOnElem);
        if(NULL != pPropOnElem){
            CATVisPropertiesValues PropValue;
$ X2 _" Y1 z& l            CATVisPropertyType PropTypeOnPtObj = CATVPShow;
6 s4 W: `+ `8 A5 x9 ]8 Q            CATVisGeomType GeomTypeOnPtObj = CATVPGlobalType;
9 w5 o( n% B/ t1 m; F            PropValue.SetShowAttr(CATNoShowAttr);
2 `2 q, ^# F- f; z. O& ~            rc = pPropOnElem->SetPropertiesAtt(PropValue,
                PropTypeOnPtObj,
                GeomTypeOnPtObj);
            pPropOnElem->Release();
            pPropOnElem = NULL;
9 }& Q4 N( l8 h1 f- C% J        }
, v5 T4 `. d3 v" [, B2 S' i    }
}