CATIA CAA二次开发源码分享：拓扑转特征过程--线

admin

CATIA CAA二次开发源码分享：拓扑转特征过程
' c/ _1 k/ m' k& ]" H# D
( y/ ?( S; `# N9 g2 ^" {
. @' F, A' l6 v4 z% U
[mw_shl_code=c,true] CATTopVertex       *pTopVertex = NULL;
* q% Z, ^/ h- {1 s% j5 i   CATBody               *pPtBody1   = NULL;
   CATBody               *pPtBody2   = NULL;
$ x' f# s% V8 q9 V2 z   CATBody               *pLineBody  = NULL;
   CATSoftwareConfiguration *pConfig = new CATSoftwareConfiguration ( );
   CATTopData TopData ( pConfig );
( r) ^& b# t4 }8 y   //pPoint = piGeomFactory->CreateCartesianPoint ( Point1 );
   pTopVertex = CATCreateTopVertex ( piGeomFactory, &TopData, Point1 );

; a6 h7 f; P# I1 d; g7 F* z   pTopVertex->Run ( );
; `6 x" I# V, [0 O
6 @' ]* ^% A; w( s- O$ M! l3 n   pPtBody1 = pTopVertex->GetResult ( );
9 D1 E& p$ b3 R4 l  a   //pPoint = piGeomFactory->CreateCartesianPoint ( Point2 );
   pTopVertex = CATCreateTopVertex ( piGeomFactory, &TopData, Point2 );
   pTopVertex->Run ( );
# z$ o- X5 A1 J4 Z# G: h  Y   pPtBody2 = pTopVertex->GetResult ( );
   pLineBody = ::CATCreateTopLineFromPoints ( piGeomFactory, &TopData, pPtBody1, pPtBody2 );
* k- i9 j8 ?$ i# Y2 k# L  G& t///////////////实例化
- ~8 y/ D$ H8 E   CATIDatumFactory_var spDatum=NULL_var;
" B, v7 H5 t  p' p: M                                        CATISpecObject * piDatumFeature=NULL;
; [  j& k4 E  F, W4 i//CATISpecObject_var spOutDatumFeature=NULL_var;
2 _+ o; K2 A, g6 f  S9 Y" Crc=piRootContainer->QueryInterface(IID_CATIDatumFactory, (void**) &spDatum);
# b. E4 G6 p) i! h( ]: xif(SUCCEEDED(rc))
{
     ::MessageBox(NULL,(CString)("IID_CATIDatumFactory成功"),_T("提示"),MB_OK|MB_ICONWARNING);
) ^. Z) M" C& p+ j5 q}
                rc=spDatum->InstanciateDatum(pLineBody,piDatumFeature);
5 Q$ H  H1 \5 b! e3 @  v& @1 H                if(SUCCEEDED(rc))
{
) v4 r3 C4 L2 K, |. x4 D$ M$ v; m     ::MessageBox(NULL,(CString)("实例化成功"),_T("提示"),MB_OK|MB_ICONWARNING);
}else
{
     ::MessageBox(NULL,(CString)("实例化不成功"),_T("提示"),MB_OK|MB_ICONWARNING);
! m' \4 p2 P! k4 r: v' U}
CATISpecObject_var spObjectFromBody=piDatumFeature;
8 B% L: l2 B6 @: t: \2 Q# ]                spObjectFromBody->Update();      
9 D% m. ~" h8 G6 O
               
                CATIGSMProceduralView_var spPntObj=NULL_var;
                spPntObj = spObjectFromBody;
9 ?( o* [2 S3 f. e) b                spPntObj->InsertInProceduralView();
3 Z* ?, I+ z4 q* m! M[/mw_shl_code]