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

admin

) T5 a  S" x8 F- r8 ECATIA CAA二次开发源码分享：拓扑转特征过程
3 U) l1 ^' ]6 ~. e" I5 Q  e7 D
, M/ u! }7 e! K; h' q( U  s

[mw_shl_code=c,true] CATTopVertex       *pTopVertex = NULL;
   CATBody               *pPtBody1   = NULL;
8 v! A) B4 q- e   CATBody               *pPtBody2   = NULL;
4 h) N$ E& w  ^! \' f   CATBody               *pLineBody  = NULL;
: A6 p" T6 j7 }! I, ^8 w0 T# i9 C   CATSoftwareConfiguration *pConfig = new CATSoftwareConfiguration ( );
   CATTopData TopData ( pConfig );
' a  u  @, G" c; U' U; i' c  [4 g   //pPoint = piGeomFactory->CreateCartesianPoint ( Point1 );
   pTopVertex = CATCreateTopVertex ( piGeomFactory, &TopData, Point1 );
) t0 d/ Y( H# N4 K
& j- V8 l  s) f   pTopVertex->Run ( );

   pPtBody1 = pTopVertex->GetResult ( );
   //pPoint = piGeomFactory->CreateCartesianPoint ( Point2 );
   pTopVertex = CATCreateTopVertex ( piGeomFactory, &TopData, Point2 );
   pTopVertex->Run ( );
2 U  w0 D& g5 L2 \   pPtBody2 = pTopVertex->GetResult ( );
4 L7 R, @5 g6 Z3 b0 k" \) P   pLineBody = ::CATCreateTopLineFromPoints ( piGeomFactory, &TopData, pPtBody1, pPtBody2 );
+ N9 A/ ?% ?4 i6 T' \1 }3 o. g///////////////实例化
   CATIDatumFactory_var spDatum=NULL_var;
                                        CATISpecObject * piDatumFeature=NULL;
2 A9 G) D/ \, X+ t//CATISpecObject_var spOutDatumFeature=NULL_var;
, E: `, H. a( m6 Z; m: q. Drc=piRootContainer->QueryInterface(IID_CATIDatumFactory, (void**) &spDatum);
if(SUCCEEDED(rc))
' J2 ]2 ^% w2 [4 Y1 d) O# E{
     ::MessageBox(NULL,(CString)("IID_CATIDatumFactory成功"),_T("提示"),MB_OK|MB_ICONWARNING);
9 B3 d" {0 M1 q- ?}
* D9 z8 d  }9 I" ?( h1 f4 m* E3 |% W8 A                rc=spDatum->InstanciateDatum(pLineBody,piDatumFeature);
% r5 Z0 b  j1 R6 P, T1 t3 {                if(SUCCEEDED(rc))
; `9 S2 J; n  E{
     ::MessageBox(NULL,(CString)("实例化成功"),_T("提示"),MB_OK|MB_ICONWARNING);
}else
, h' `! s4 C* q; q7 `. _{
     ::MessageBox(NULL,(CString)("实例化不成功"),_T("提示"),MB_OK|MB_ICONWARNING);
3 z+ I# J0 q! H! i}
CATISpecObject_var spObjectFromBody=piDatumFeature;
                spObjectFromBody->Update();      

               
- ~/ I9 [  O8 s$ r8 Z                CATIGSMProceduralView_var spPntObj=NULL_var;
                spPntObj = spObjectFromBody;
                spPntObj->InsertInProceduralView();
[/mw_shl_code]