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

admin

: I+ T2 N7 \- G+ V. u1 E+ KCATIA CAA二次开发源码分享：拓扑转特征过程



% Z! d, u: b6 H[mw_shl_code=c,true] CATTopVertex       *pTopVertex = NULL;
" v# r- H+ y5 W+ ]% ]   CATBody               *pPtBody1   = NULL;
, L2 f# N0 D4 l+ t   CATBody               *pPtBody2   = NULL;
0 U; s; j  l7 P( w% Z: {8 t   CATBody               *pLineBody  = NULL;
   CATSoftwareConfiguration *pConfig = new CATSoftwareConfiguration ( );
   CATTopData TopData ( pConfig );
   //pPoint = piGeomFactory->CreateCartesianPoint ( Point1 );
7 a9 W7 ]6 j& |# _2 u9 p6 |9 [+ q$ ^" f2 L   pTopVertex = CATCreateTopVertex ( piGeomFactory, &TopData, Point1 );

& M1 h$ G  p# k1 F   pTopVertex->Run ( );
0 w& Z& o0 N) t# }* w  J$ ^
   pPtBody1 = pTopVertex->GetResult ( );
0 G" b! c( [8 j. a! N. a) J* y+ s   //pPoint = piGeomFactory->CreateCartesianPoint ( Point2 );
   pTopVertex = CATCreateTopVertex ( piGeomFactory, &TopData, Point2 );
. s% S* t- X9 N& |9 d3 M. _   pTopVertex->Run ( );
   pPtBody2 = pTopVertex->GetResult ( );
1 |2 U' ~3 @6 A! ]   pLineBody = ::CATCreateTopLineFromPoints ( piGeomFactory, &TopData, pPtBody1, pPtBody2 );
///////////////实例化
   CATIDatumFactory_var spDatum=NULL_var;
, p' d9 I0 f+ r3 a                                        CATISpecObject * piDatumFeature=NULL;
  T9 H( m2 X% y) D//CATISpecObject_var spOutDatumFeature=NULL_var;
" }1 Q0 V4 `+ ?  orc=piRootContainer->QueryInterface(IID_CATIDatumFactory, (void**) &spDatum);
- ^' ]9 s, {8 L' [if(SUCCEEDED(rc))
# S8 a  x2 W5 w# J  M: A; T7 A  }{
     ::MessageBox(NULL,(CString)("IID_CATIDatumFactory成功"),_T("提示"),MB_OK|MB_ICONWARNING);
}
                rc=spDatum->InstanciateDatum(pLineBody,piDatumFeature);
                if(SUCCEEDED(rc))
{
     ::MessageBox(NULL,(CString)("实例化成功"),_T("提示"),MB_OK|MB_ICONWARNING);
}else
{
, i' k0 _9 \- ^$ C6 o8 _1 c! I     ::MessageBox(NULL,(CString)("实例化不成功"),_T("提示"),MB_OK|MB_ICONWARNING);
7 P/ A) b: ?( `6 e}
5 Q- W* D0 C4 t. O% F* RCATISpecObject_var spObjectFromBody=piDatumFeature;
* A1 o4 h& r; `+ ^$ Y                spObjectFromBody->Update();      

               
  P* _3 T$ u% @' A) ^! `* u                CATIGSMProceduralView_var spPntObj=NULL_var;
                spPntObj = spObjectFromBody;
                spPntObj->InsertInProceduralView();
[/mw_shl_code]