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

admin

获得零件指针
% k" I) a# X$ ]$ g0 a% O% \" r) `// 获得文件指针
9 X) \& T5 H0 C. t) Y& g. T8 QCATDocument * pDoc= NULL;
4 N+ R& d; H7 `$ d3 J8 f% s2 KCATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
pDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
1 V3 T1 r' c: p7 L* {, iCATInit_var spInitOnDoc(pDoc);
4 C0 X* b8 @% Q6 |// 得到零件根容器

CATIPrtContainer * piPrtCont =
(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
% _$ w+ ^+ N* G) w% T/ W// 得到零件指针
/ N/ x1 i1 x0 FCATIPrtPart_var spPart = piPrtCont->GetPart();
$ F( S9 `; b4 c( y8 `
创建草图
2 K: |& M( [5 ^5 u' b//初始化草图工厂
- h7 ^5 E( L6 j( O5 x1 k4 kCATISketchFactory_var spSketchFactory(piPrtCont);
//在XY plane 上创建草图
CATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));
. \, ^9 L8 h6 L4 L$ u
3 N) V8 r3 P" \. d" `* {& b2 A6 O创建草图几何
! K1 M; `. x$ i//首先声明编辑草图
- f3 M5 x! `6 u% u2 [spSketch->OpenEdition();
CATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
7 ?3 l5 U0 a6 r# G: n0 C6 cdouble iPoint[2] = {0.,0.};
//下面创建圆圈
CATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
CATI2DCurve_var spCurveOnLine(spLine);
spCurveOnLine->GetStartPoint();
) v5 L1 h1 g: O( U! v" ]6 S# [spCurveOnLine->GetEndPoint();
- v# @6 @  B. t+ L//然后退出草图：
. U7 A3 D2 }0 J  `8 \! ^spSketch->CloseEdition();


创建约束
/ ~% @8 M( }# {& A) MCATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
, m, T- L6 f/ T! R$ h. d3 r* h  H//定义spLine1 的半径约束
spConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
NULL, Cst2DType_Radius, 0, 0 );
. Q5 P( t8 p: x  \% ^* g- x//定义spLine1 与坐标原点的同心约束
5 d" U) [* o# HCATI2DAxis_var spSupport = NULL_var;
spSketch->GetAbsolute2DAxis(spSupport);
* |+ `5 `/ I1 [! z/ T9 F' _" b6 A
spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
NULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );

) Q7 m4 |8 x; C
创建凸台
// 从编辑框中获得援助的高度
" h( t9 v# `% w/ @- X9 Ydouble firstLimit = _Editor004->GetFloatValue();
: n- r1 y& `( @5 s. }2 l: M4 k6 ]double secondLimit = 0.;
% U3 B6 b) J0 a4 Z# u( I5 Y( {//圆柱的轴向方向为Z 轴方向
3 X, f0 Y6 p9 N7 K0 GCATMathDirection dirZ(0., 0., 1.);
$ n  x1 F# j- ]" B//初始化零件工厂
- Q" j+ [6 O! `7 bCATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
3 \- d1 b4 K) R  L- E0 I8 i//创建凸台
CATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
//设置拉伸方向
( a, v- \) m7 F: ^/ H5 u- }+ EspPadOnSpecObj->ModifyDirection(dirZ);
//设置凸台第一限制类型
  L$ m6 }' k: ?, S" M& \1 _spPadOnSpecObj->ModifyEndType(catOffsetLimit);
//设置凸台的高度
$ {# m( g" g  x  m5 L: C* M  Z& espPadOnSpecObj->ModifyEndOffset(firstLimit);
: P% n$ i4 k) F) q; J//设置凸台第二限制类型
8 o. O. i4 U" T" T- T$ z5 vspPadOnSpecObj->ModifyStartType(catOffsetLimit);
+ [6 I9 q6 [" o* CspPadOnSpecObj->ModifyStartOffset(secondLimit);
//将凸台添加在结构树中
# B5 e, }, w9 g8 TspSpecObj->Update();
1 ^: n4 q! a3 C- ]CATIGSMProceduralView_var ispProcView = spSpecObj;
if (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}
% a) B6 ~, p1 p8 z+ `1 p
/ x' m2 z: A8 H6 T- ?: q