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

admin

; F8 E( q0 E& S2 \% O  E
个人认为，比较常见吧，如何遍历得到几何体，通过几何体获取到拓扑体，通过体获取到几何元素，通过几何元素获取到单元，单元再到几何进行判断面的种类，对于BrepAccess的获取需要借用 全局函数 CATBrepAccess ！
. V, T- L3 H# n' y' y3 }7 I
: e  o. S6 J( E- z

1 V$ B6 v9 [5 j[mw_shl_code=c,true]
        //get the main body
       
7 p8 S; q  z' M        ----   -----
{
        CATIPartRequest_var spPrtRequest = spPrtPart;
2 {, u5 Y1 W. h, W$ n        if (NULL_var == spPrtRequest)
, e) p( g) l$ ^, Y- v* V7 c. g* S& b, K' W        {
                printMessage("NULL_var == spPrtRequest");
% p* P& V. k" e7 B( |% p$ G$ b                return;
        }
# Y9 C& a" f2 v7 m. i# O        CATBaseUnknown_var spMainBody;

9 e0 z! q" b: G        rc = spPrtRequest->GetMainBody("",spMainBody);
        if (FAILED(rc))
8 m2 ~/ [9 C( Y5 p6 X5 z! r/ d( _        {
0 ]9 k4 T3 P4 j! [6 `                printMessage("Failed spPrtRequest");
" U; d- }  F0 ]* ]                return;
        }
8 Z. U/ q  B2 ^* c2 e
        CATIAlias_var spAliasBody = spMainBody;

/ K4 s/ w) d8 J; G3 ~1 F1 g. B        printMessage("Main Body" + spAliasBody->GetAlias());
8 z0 N2 I8 F  g8 |* S, W  }
        CATIBodyRequest_var spBodyRequest = spMainBody;
        if (NULL_var == spBodyRequest)
        {
                printMessage("NULL_var == spBodyRequest");
                return;
4 X9 v7 W7 i  P) ?8 u        }
0 T7 C0 k% W. E2 i* J7 r& Q        CATLISTV(CATBaseUnknown_var) ListResult;
7 E( a" @$ a/ Z3 |7 q3 t4 S8 A# z        rc = spBodyRequest->GetResults("",ListResult);
( c) c0 k# S& R% S9 D        if (FAILED(rc)|| 0 == ListResult.Size())
        {
                printMessage("ListResult failed spBodyRequest");
                return;
* A9 @5 w; O& q( b+ Z) h. Z3 H        }
/ g* h) ?+ s: p1 O# I9 m        CATIGeometricalElement_var spFeatureResultGeomElement = ListResult[1];

& A+ q/ I# r1 G! ^( |: \7 X        if (NULL_var == spFeatureResultGeomElement)
        {
$ K+ ~4 k2 E: H( E: ]( O; m! v9 o                printMessage("NULL_var == spFeatureResultGeomElement");
                return;
& q# ]; c5 Z% i  d. {8 e1 O        }

        CATBody_var spTopoBody = spFeatureResultGeomElement->GetBodyResult();
        if (NULL_var == spTopoBody)
5 h1 p# T3 d, }9 n* J: Q        {
                printMessage("NULL_var == spTopoBody");
                return;
        }

3 w4 V/ {1 S/ }% p: i
5 w( S0 P+ x$ R! s. g        CATLISTP(CATCell) cells;
        spTopoBody->GetAllCells(cells,2); //get all the faces
! [9 p% w+ V& Q7 ]) S
. B! R- i  b' L        char msg[256];
        sprintf_s(msg,sizeof(msg),"Face Number :%d",cells.Size());
( r. d# ^# N. a        printMessage(msg);

! h/ q4 `3 ?1 x" O5 `$ w        for (int i = 1; i <= cells.Size();i++)
2 J5 H7 Q. W9 Y2 m2 L! b        {
                CATCell_var pCell = cells;
, n$ g; h. L  q1 ]6 e% a- v                if (NULL_var!=pCell)
                {
; j. p/ u3 |* i' K  B4 U                        CATGeometry *pGeometry = pCell->GetGeometry();
7 D5 O2 [8 D1 d                        if (NULL!=pGeometry && pGeometry->IsATypeOf(CATPlaneType)) //plane face
" j  @! J* q: g( ~. S3 ]- B                        {
. i( D% y( I4 g; R0 [' g
- i9 V" ^4 ~9 Q) C8 [0 x& R                                //CATMathPoint CenterPoint;
                                //pGeometry->GetBoundingBox().GetBoxCenter(CenterPoint);
8 @9 O- q- E$ c. Q                                //sprintf_s(msg,sizeof(msg),"Face center :%f,%f,%f",CenterPoint.GetX(),CenterPoint.GetY(),CenterPoint.GetZ());
0 Y: X7 w, \8 B. s                                //printMessage(msg);
                                 
, E0 B3 _1 u# B                                CATIBRepAccess_var spBrepAccess = CATBRepDecode(pCell, spFeatureResultGeomElement);
& m5 }8 Z" z6 c& V1 J$ n# b                            if (spBrepAccess != NULL_var)
                            {
                                        //assign color                               
0 c) V: w8 ?/ _+ s4 y/ |7 f6 Y                                        CATIVisProperties * pVisProperties = NULL;
0 j* T# r! l( W' E' v                                        rc = spBrepAccess->QueryInterface(IID_CATIVisProperties,(void **) &pVisProperties);
                                        if (SUCCEEDED(rc))
# t. e2 ]0 G* \8 {9 _( z                                        {
) h( h& D9 w$ x5 ^% ^5 ~                                                CATVisPropertiesValues ivalues;
                                                ivalues.SetColor(0,0,255);
5 a+ p, \- @- k9 f                                                pVisProperties->SetPropertiesAtt(ivalues,CATVPColor,CATVPMesh );
) Z$ L& Q5 ?8 d7 H8 M* ~3 D                                        }
0 }8 E; U6 E( \                                        pVisProperties->Release();
8 ~( p7 a5 Z3 S' y7 o                                        pVisProperties = NULL;
                               
2 {! t  M: N5 l+ e' ^  t                                 }
+ Y3 y$ N3 c6 _$ }6 R
* `" I/ U/ w2 j. J6 o                           }
7 u' U5 ?' I; |: o6 V                                //get alias name and persistentTag to add in the list
8 W* W0 n/ x5 p& K4 I                       
0 g4 O2 \2 ^" A# h                               
' u: R7 ?0 e7 H- y; ^                       
3 `. L+ }" u9 [8 I                        }
  `/ J5 e1 @# C8 Q+ y2 G
; D. p/ t, o  h; B                }

        // End of User Code
}
[/mw_shl_code]