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

admin

, @  C3 F5 I3 D1 r
个人认为，比较常见吧，如何遍历得到几何体，通过几何体获取到拓扑体，通过体获取到几何元素，通过几何元素获取到单元，单元再到几何进行判断面的种类，对于BrepAccess的获取需要借用 全局函数 CATBrepAccess ！
! ?' u5 y4 P6 P0 S9 w" Z9 g


: ?4 y& D0 a, v[mw_shl_code=c,true]
        //get the main body
       
* J1 @' J- Y8 c6 g5 P        ----   -----
* n( F; }) k! \; d; L$ z2 U{
* @* g% D5 L* `6 B7 t6 X3 e' T4 c$ D        CATIPartRequest_var spPrtRequest = spPrtPart;
        if (NULL_var == spPrtRequest)
; C- M) i: Q: d* U5 U4 Q5 D6 l        {
  A) B, [9 \! _                printMessage("NULL_var == spPrtRequest");
% I8 ~5 N9 n- b% K% {. O                return;
) [- E: I& L  A2 r. o' R  C        }
9 }3 y- |* ^9 r, S. q: N# D7 V# Y9 @        CATBaseUnknown_var spMainBody;

        rc = spPrtRequest->GetMainBody("",spMainBody);
' ^1 b' H5 z6 S0 E7 d/ P        if (FAILED(rc))
        {
                printMessage("Failed spPrtRequest");
                return;
4 }7 R/ ^; x' W4 R% u# V4 T        }
% X) C2 p* H; B; |0 u3 @0 W$ K; a
        CATIAlias_var spAliasBody = spMainBody;

/ y4 P2 H4 W; r        printMessage("Main Body" + spAliasBody->GetAlias());
0 [7 F4 [& t. `6 w9 {5 z1 s& \# D
        CATIBodyRequest_var spBodyRequest = spMainBody;
; \0 W- f0 e6 s) D1 p        if (NULL_var == spBodyRequest)
* V$ L9 _* {- `        {
) o7 N6 m' {' R7 y) d                printMessage("NULL_var == spBodyRequest");
                return;
4 F- \: Y8 z+ Q: s        }
. K. t1 [. A! q5 r$ S7 W% _        CATLISTV(CATBaseUnknown_var) ListResult;
        rc = spBodyRequest->GetResults("",ListResult);
        if (FAILED(rc)|| 0 == ListResult.Size())
! W1 f$ J$ E0 O  J        {
                printMessage("ListResult failed spBodyRequest");
                return;
2 k. B! R0 k& Y! v" C        }
        CATIGeometricalElement_var spFeatureResultGeomElement = ListResult[1];
6 V7 R" _4 C: B+ q
        if (NULL_var == spFeatureResultGeomElement)
        {
                printMessage("NULL_var == spFeatureResultGeomElement");
                return;
0 M# M/ z' I* R. Z        }

8 P3 D  `  z: e" j& m        CATBody_var spTopoBody = spFeatureResultGeomElement->GetBodyResult();
3 m* p& p2 u7 R/ L0 M5 _        if (NULL_var == spTopoBody)
9 X, o% ^- ?, v: {% j        {
" Z* u2 i- n% Q  V0 S1 I% @' F! J2 c" [                printMessage("NULL_var == spTopoBody");
  U/ |! c' o9 x7 D2 F                return;
/ l( @4 [0 o4 m        }

5 _' H5 C  n0 B( ?
9 |/ A! C: f& P6 F$ P" h( a        CATLISTP(CATCell) cells;
        spTopoBody->GetAllCells(cells,2); //get all the faces

4 ~# b9 O$ `; L8 e; o% ^# K* y# W        char msg[256];
        sprintf_s(msg,sizeof(msg),"Face Number :%d",cells.Size());
& D0 K2 @6 i9 D6 _        printMessage(msg);
+ B- ?% [% p5 d+ z' B3 n6 b
        for (int i = 1; i <= cells.Size();i++)
8 b7 I- W# J; M) w( s. X        {
                CATCell_var pCell = cells;
. ^# e$ X/ u0 A3 {2 t6 E  v                if (NULL_var!=pCell)
  K' @4 w' @! [$ O- N. t1 \                {
                        CATGeometry *pGeometry = pCell->GetGeometry();
' q" S* h. ]+ [* H. u& Y! O                        if (NULL!=pGeometry && pGeometry->IsATypeOf(CATPlaneType)) //plane face
                        {
8 S4 q" Z3 U* t! F
# _; ?9 T8 S' Z4 K2 b( I' \) Y                                //CATMathPoint CenterPoint;
                                //pGeometry->GetBoundingBox().GetBoxCenter(CenterPoint);
, M" c3 n: |* K: _* g& P                                //sprintf_s(msg,sizeof(msg),"Face center :%f,%f,%f",CenterPoint.GetX(),CenterPoint.GetY(),CenterPoint.GetZ());
3 _: P3 |% N5 ^; N, h" H                                //printMessage(msg);
                                 
                                CATIBRepAccess_var spBrepAccess = CATBRepDecode(pCell, spFeatureResultGeomElement);
6 Q$ U$ _/ w% D  {& N3 L                            if (spBrepAccess != NULL_var)
' G7 a5 t, r& o% T( t                            {
                                        //assign color                               
                                        CATIVisProperties * pVisProperties = NULL;
                                        rc = spBrepAccess->QueryInterface(IID_CATIVisProperties,(void **) &pVisProperties);
                                        if (SUCCEEDED(rc))
* N0 B& c& ^) ]8 M4 g0 l; t* J                                        {
, `7 ^/ i- v- X8 l( B0 |                                                CATVisPropertiesValues ivalues;
                                                ivalues.SetColor(0,0,255);
7 z3 a* k0 \7 V                                                pVisProperties->SetPropertiesAtt(ivalues,CATVPColor,CATVPMesh );
                                        }
                                        pVisProperties->Release();
6 }4 \3 Q7 g* X- z0 o                                        pVisProperties = NULL;
                               
8 J  e  ^2 v$ P9 h( [                                 }
3 d; F' A" ^2 {1 w2 S
% M5 u5 {7 z# p2 v6 j; y  i0 W( z3 [                           }
                                //get alias name and persistentTag to add in the list
                       
                               
                       
                        }
8 d' H) k3 D* L( f
                }

  b) b. R: w8 r. ~; d* d        // End of User Code
}
# s& I6 t5 y; }" k4 t[/mw_shl_code]