Catia 二次开发源码分享： 获取所有的平面并着色

admin

/ A! {0 P' m4 o  ^: ?/ k个人认为，比较常见吧，如何遍历得到几何体，通过几何体获取到拓扑体，通过体获取到几何元素，通过几何元素获取到单元，单元再到几何进行判断面的种类，对于BrepAccess的获取需要借用 全局函数 CATBrepAccess ！
, L! D/ h/ J, w: W
5 }) W" m  J0 F- M! s. N% U

9 }* @8 M8 o7 K) E4 J[mw_shl_code=c,true]
        //get the main body
0 J4 i6 Z( y# Q9 C8 {: j       
        ----   -----
% N$ s. \) s4 g$ D% a{
        CATIPartRequest_var spPrtRequest = spPrtPart;
        if (NULL_var == spPrtRequest)
: j8 V6 O7 n! M8 b5 p9 e        {
2 G& i6 G1 F& N% r1 O$ C" c                printMessage("NULL_var == spPrtRequest");
! G; O0 x9 R' }) }                return;
        }
, Z2 F  H. Y1 E, ?9 V! }        CATBaseUnknown_var spMainBody;

        rc = spPrtRequest->GetMainBody("",spMainBody);
        if (FAILED(rc))
        {
& p. ~# v& y3 {                printMessage("Failed spPrtRequest");
! F4 S8 c" p5 ^2 Q5 c( n# Y                return;
        }
+ ^# Y$ ]2 q! b* f2 ?7 G0 Q
        CATIAlias_var spAliasBody = spMainBody;
5 ?8 K# J; a4 U$ q# N* B; Y
        printMessage("Main Body" + spAliasBody->GetAlias());
- @8 J$ _" g+ F8 O) k# ^5 t
' b( G, ~) x9 D2 M0 S        CATIBodyRequest_var spBodyRequest = spMainBody;
% y' \  I1 P: I, O% u  b3 y9 T        if (NULL_var == spBodyRequest)
' {; B- l; x  t% a/ V        {
' D: I" ?( K+ {( o                printMessage("NULL_var == spBodyRequest");
) n, M7 e5 ]2 x' a                return;
        }
        CATLISTV(CATBaseUnknown_var) ListResult;
6 v# t8 c9 V: E7 G        rc = spBodyRequest->GetResults("",ListResult);
        if (FAILED(rc)|| 0 == ListResult.Size())
) g+ X* ]: g/ W  g        {
                printMessage("ListResult failed spBodyRequest");
& k# J1 [2 |# |- \* k: F9 V                return;
6 f  ^) t8 O& d% F        }
        CATIGeometricalElement_var spFeatureResultGeomElement = ListResult[1];
4 @$ e" o7 `  J  D
; P# x8 e) v2 T. f        if (NULL_var == spFeatureResultGeomElement)
        {
                printMessage("NULL_var == spFeatureResultGeomElement");
: G4 |) F  G. W4 `, Z$ r                return;
5 n, u: W$ z6 b! ?        }
+ ?% n9 p$ T% @" Z0 L
/ l/ G6 g! f2 U' o        CATBody_var spTopoBody = spFeatureResultGeomElement->GetBodyResult();
        if (NULL_var == spTopoBody)
2 O) R+ ~, t0 R2 t- d& t        {
& Q. {$ C3 l0 C! h- r+ R) \* _3 r/ e                printMessage("NULL_var == spTopoBody");
9 Z) }9 g# ~5 @& m, F- D                return;
        }
  s. p. H9 S. x4 D+ b) b

" C" I. s3 t# \; L% U* Z; i( ^% ?, Q        CATLISTP(CATCell) cells;
        spTopoBody->GetAllCells(cells,2); //get all the faces

        char msg[256];
        sprintf_s(msg,sizeof(msg),"Face Number :%d",cells.Size());
" @: @& z! s5 D8 J        printMessage(msg);
7 C' {9 K, `8 D1 O8 c) }9 D
        for (int i = 1; i <= cells.Size();i++)
2 I: v8 v0 N' n. g7 d1 l+ }& H        {
+ r+ n( K; `8 M$ t$ N1 G3 T                CATCell_var pCell = cells;
8 O% [& J2 t7 U: V$ m6 U- b7 G                if (NULL_var!=pCell)
$ C5 U$ o, V; h; C9 j2 g& R. O* v                {
$ R! o- ?( A0 X. y                        CATGeometry *pGeometry = pCell->GetGeometry();
) J# [  U/ |2 Z' F' V6 M* E# L$ z% n0 S                        if (NULL!=pGeometry && pGeometry->IsATypeOf(CATPlaneType)) //plane face
0 S( P/ C: e/ |4 O; a. y/ p% Q( P                        {
/ J: s) o8 |6 O( m9 J8 \2 z( s
                                //CATMathPoint CenterPoint;
                                //pGeometry->GetBoundingBox().GetBoxCenter(CenterPoint);
                                //sprintf_s(msg,sizeof(msg),"Face center :%f,%f,%f",CenterPoint.GetX(),CenterPoint.GetY(),CenterPoint.GetZ());
1 O9 A) W& B, U6 R, h+ e# e% O- z0 F                                //printMessage(msg);
                                 
  i: t$ }3 l- E4 Q! B  _3 H                                CATIBRepAccess_var spBrepAccess = CATBRepDecode(pCell, spFeatureResultGeomElement);
                            if (spBrepAccess != NULL_var)
4 i- f0 ~2 l7 j( R5 r                            {
                                        //assign color                               
$ C+ o0 B( D( ~/ B9 ]: T                                        CATIVisProperties * pVisProperties = NULL;
                                        rc = spBrepAccess->QueryInterface(IID_CATIVisProperties,(void **) &pVisProperties);
                                        if (SUCCEEDED(rc))
                                        {
                                                CATVisPropertiesValues ivalues;
1 G' x9 p- v/ R4 J4 \, ]) g                                                ivalues.SetColor(0,0,255);
& W- [: z9 N# B7 _) g5 c                                                pVisProperties->SetPropertiesAtt(ivalues,CATVPColor,CATVPMesh );
                                        }
                                        pVisProperties->Release();
6 @  u) g/ ?" B                                        pVisProperties = NULL;
5 m. f  Y9 L/ L! x& Y                               
                                 }

; h8 u8 B! q, U/ a" R( ^1 ^% K                           }
* u$ U  v) p/ H5 g! |3 ]                                //get alias name and persistentTag to add in the list
                       
9 i6 P! ]# ~8 {' L# X" y                               
                       
                        }

/ f& A* R9 ]' S                }
# S# \- A' C6 Z/ [# J
7 Q7 x, X1 P: ?        // End of User Code
}
[/mw_shl_code]
4 ^; h7 Z8 M  r# ~