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

admin

8 r/ G: o! s! Z# m1 s9 I
+ W2 ~' w6 A, I; DCATIA CAA二次开发源码分享：拓扑转特征过程
8 k: @8 Z. ]2 D2 t2 V3 E2 ~
+ |! m- T: p" D

[mw_shl_code=c,true] CATTopVertex       *pTopVertex = NULL;
8 S$ m- h, @4 q   CATBody               *pPtBody1   = NULL;
   CATBody               *pPtBody2   = NULL;
   CATBody               *pLineBody  = NULL;
+ _8 E2 ^/ z$ U) E1 M% w1 Z   CATSoftwareConfiguration *pConfig = new CATSoftwareConfiguration ( );
   CATTopData TopData ( pConfig );
1 j: e0 M/ f; U  s5 N   //pPoint = piGeomFactory->CreateCartesianPoint ( Point1 );
" B/ e" K$ [9 y$ x1 G4 x6 K   pTopVertex = CATCreateTopVertex ( piGeomFactory, &TopData, Point1 );

( }0 H/ J% d4 G# L, D   pTopVertex->Run ( );

% l0 Y- |, C- W" \/ O- f+ L& ?   pPtBody1 = pTopVertex->GetResult ( );
   //pPoint = piGeomFactory->CreateCartesianPoint ( Point2 );
   pTopVertex = CATCreateTopVertex ( piGeomFactory, &TopData, Point2 );
   pTopVertex->Run ( );
7 k+ W0 G+ Q/ ?3 x% C   pPtBody2 = pTopVertex->GetResult ( );
) `) D9 ~; C  K- \& e   pLineBody = ::CATCreateTopLineFromPoints ( piGeomFactory, &TopData, pPtBody1, pPtBody2 );
9 a2 n3 b2 d" W' ?' V6 x- X///////////////实例化
4 O4 a6 T1 J1 }  |! A, Y$ {   CATIDatumFactory_var spDatum=NULL_var;
                                        CATISpecObject * piDatumFeature=NULL;
# [5 y# m( Z0 ^( v7 f3 R' h//CATISpecObject_var spOutDatumFeature=NULL_var;
* ~; v0 Q( l  t& j6 Grc=piRootContainer->QueryInterface(IID_CATIDatumFactory, (void**) &spDatum);
5 {. g9 ^3 ~/ v2 N2 [7 jif(SUCCEEDED(rc))
: N2 e9 Y$ H1 g2 i) Q{
     ::MessageBox(NULL,(CString)("IID_CATIDatumFactory成功"),_T("提示"),MB_OK|MB_ICONWARNING);
1 |8 }, }: e, h6 i) T}
                rc=spDatum->InstanciateDatum(pLineBody,piDatumFeature);
7 |6 R: d+ v  ?9 r/ j8 w                if(SUCCEEDED(rc))
8 z/ R9 W3 [9 x* [4 K! B+ v{
     ::MessageBox(NULL,(CString)("实例化成功"),_T("提示"),MB_OK|MB_ICONWARNING);
& X( s/ Y# d5 q* ~5 o9 l}else
{
     ::MessageBox(NULL,(CString)("实例化不成功"),_T("提示"),MB_OK|MB_ICONWARNING);
}
CATISpecObject_var spObjectFromBody=piDatumFeature;
/ n/ K' b# i0 @, z' c8 @" ^                spObjectFromBody->Update();      

               
                CATIGSMProceduralView_var spPntObj=NULL_var;
                spPntObj = spObjectFromBody;
                spPntObj->InsertInProceduralView();
  R6 m! J1 k, p! S$ y[/mw_shl_code]