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

admin

获得零件指针
// 获得文件指针
CATDocument * pDoc= NULL;
" c( h6 X  p* s9 tCATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
CATInit_var spInitOnDoc(pDoc);
- F# P; F& e. Q& @& B# b% L// 得到零件根容器
  |9 N0 W' M: a2 s5 E- V
% `9 w; c! u( `4 d1 ~CATIPrtContainer * piPrtCont =
- I* K( C! `6 @" X  L(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
: N3 e0 \. Z0 v) k  Q" U// 得到零件指针
CATIPrtPart_var spPart = piPrtCont->GetPart();
* @5 E! M/ w5 C% j) z0 _! L
  v, Y% P2 c6 [7 X- c/ ]创建草图
//初始化草图工厂
CATISketchFactory_var spSketchFactory(piPrtCont);
//在XY plane 上创建草图
CATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));

1 F& h6 z4 c+ N7 t. [( a' S3 \创建草图几何
//首先声明编辑草图
spSketch->OpenEdition();
# e6 m! B( o! i3 ]CATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
0 Z7 K" N% ~. }double iPoint[2] = {0.,0.};
2 ^- A, ^& |, [( S//下面创建圆圈
CATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
7 j% O) U& I9 q# O' D9 p0 JCATI2DCurve_var spCurveOnLine(spLine);
- \  W& w5 _2 CspCurveOnLine->GetStartPoint();
. {% j, G5 _& SspCurveOnLine->GetEndPoint();
//然后退出草图：
spSketch->CloseEdition();
. l% d; l) k: H6 D8 C" H
1 j( |9 D0 X  B& d
4 o, t/ r' b( n" f% ^& J2 D6 ]创建约束
% }! i' I. T3 o& R/ LCATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
5 Y! R7 z9 N, W9 A4 q//定义spLine1 的半径约束
spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
3 C; U: {* c, a- G, MNULL, Cst2DType_Radius, 0, 0 );
  U( ^$ \3 @8 ?& w. k//定义spLine1 与坐标原点的同心约束
CATI2DAxis_var spSupport = NULL_var;
/ D, ]  J/ {) b, QspSketch->GetAbsolute2DAxis(spSupport);

spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
1 u- v1 ^( y, c# ANULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );


& A/ Q& e  K: m8 b( _! ?创建凸台
" w+ e, g7 L/ G. i7 B2 W( |// 从编辑框中获得援助的高度
! T  B) u# [; odouble firstLimit = _Editor004->GetFloatValue();
) A6 [' E0 E+ z1 U2 {5 Adouble secondLimit = 0.;
//圆柱的轴向方向为Z 轴方向
CATMathDirection dirZ(0., 0., 1.);
//初始化零件工厂
7 v% b- Z$ N+ h  ]CATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
//创建凸台
; B2 i9 O& [: C! ECATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
; N' C" t& B9 _! f& @1 `1 [//设置拉伸方向
; G5 m1 \  W- [  N/ dspPadOnSpecObj->ModifyDirection(dirZ);
  n( n5 A, h8 M- k4 G4 o//设置凸台第一限制类型
$ _1 u: a+ v; V3 B  T8 O0 kspPadOnSpecObj->ModifyEndType(catOffsetLimit);
$ C. l9 `5 S. j- s. I. D//设置凸台的高度
spPadOnSpecObj->ModifyEndOffset(firstLimit);
//设置凸台第二限制类型
/ I) A* ]8 d! {1 hspPadOnSpecObj->ModifyStartType(catOffsetLimit);
spPadOnSpecObj->ModifyStartOffset(secondLimit);
  J& _. Q+ A' M% D5 C/ U5 G//将凸台添加在结构树中
spSpecObj->Update();
CATIGSMProceduralView_var ispProcView = spSpecObj;
. r, W; t; Q0 N1 h1 ~: U. |0 Eif (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}