Catia二次开发源码分享：创建圆柱体实例

admin

获得零件指针
// 获得文件指针
+ a7 b; a% h8 U6 q  rCATDocument * pDoc= NULL;
CATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
) P1 b  o5 N* I0 E1 d) wCATInit_var spInitOnDoc(pDoc);
: [8 {' O& c9 u4 x* x// 得到零件根容器

( h, q  A+ \" m+ I3 @CATIPrtContainer * piPrtCont =
(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
* P6 @. s- F* y2 O/ I// 得到零件指针
CATIPrtPart_var spPart = piPrtCont->GetPart();

; _: d& R# S/ t5 _) K创建草图
//初始化草图工厂
CATISketchFactory_var spSketchFactory(piPrtCont);
' H0 a4 M( a2 _: F, A/ c) ^) y//在XY plane 上创建草图
( w0 p# y* w" o% M# [. B* x& p$ PCATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));

5 W' k# r  F" w" b/ q3 J5 S. X/ D创建草图几何
//首先声明编辑草图
( l0 G. V% ^- ]' c& B/ h1 m6 M2 zspSketch->OpenEdition();
CATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
" ?, d# b$ d% M: Y0 v( Adouble iPoint[2] = {0.,0.};
//下面创建圆圈
( s1 I: ~9 q2 f4 i2 A  KCATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
0 X- v- w' _+ j1 a. L# q# vCATI2DCurve_var spCurveOnLine(spLine);
spCurveOnLine->GetStartPoint();
2 ?" ]& b( U6 w% t: s- x& [spCurveOnLine->GetEndPoint();
" n5 e: Y/ _% N- Q. d- z0 ~0 E/ ]7 O//然后退出草图：
spSketch->CloseEdition();

, y) D- A# h$ q- a( o
5 o! U( ]7 z2 s/ A创建约束
CATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
+ H  B! @# i' B. k$ d6 b9 w/ d//定义spLine1 的半径约束
spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
NULL, Cst2DType_Radius, 0, 0 );
//定义spLine1 与坐标原点的同心约束
1 s3 f+ X- z* K2 k7 ?% U- BCATI2DAxis_var spSupport = NULL_var;
% J4 n  C- V6 o; GspSketch->GetAbsolute2DAxis(spSupport);
; C# q6 m3 d( m" Z4 o7 A
spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );
( b9 t4 m# M! }2 e; J
! H9 H; f9 R" f$ E. u+ o! d# f: Q
创建凸台
. M; M& q. P' E) _0 u( B' i7 W* I// 从编辑框中获得援助的高度
double firstLimit = _Editor004->GetFloatValue();
double secondLimit = 0.;
//圆柱的轴向方向为Z 轴方向
CATMathDirection dirZ(0., 0., 1.);
4 B  L* {3 ?* X+ R//初始化零件工厂
CATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
2 e6 }, p; H4 i9 A# O: d# M//创建凸台
1 o  P' J% V  R6 ?8 F/ xCATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
//设置拉伸方向
spPadOnSpecObj->ModifyDirection(dirZ);
- E* Q% N/ l) H//设置凸台第一限制类型
/ K. w8 J1 |( \3 SspPadOnSpecObj->ModifyEndType(catOffsetLimit);
//设置凸台的高度
4 r' y5 T) l9 ]6 v3 ispPadOnSpecObj->ModifyEndOffset(firstLimit);
2 _* V5 a& n& B4 h//设置凸台第二限制类型
! ^+ h6 W% D3 L, nspPadOnSpecObj->ModifyStartType(catOffsetLimit);
  x& w! m/ }9 W# X# J* O3 n8 E- w8 cspPadOnSpecObj->ModifyStartOffset(secondLimit);
//将凸台添加在结构树中
spSpecObj->Update();
CATIGSMProceduralView_var ispProcView = spSpecObj;
- O& N4 d6 P1 j! z) lif (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}

* U8 P- X% T: ~6 b3 x