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

admin

获得零件指针
* g0 X; l2 Q3 w// 获得文件指针
CATDocument * pDoc= NULL;
* S. y, s# u  L1 v" o/ cCATFrmEditor * _pEditor = CATFrmEditor::GeTCurrentEditor();
' z' J: r1 v" d$ M  P0 P) S2 JpDoc = _pEditor->GetDocument();//这里得到了PART 环境下的文档指针
- X9 O, ?1 m# N) s% P$ PCATInit_var spInitOnDoc(pDoc);
; q. J! Q& O6 I' u# j// 得到零件根容器
0 o5 g7 T/ n1 i; Q/ w. C3 O
" v, J6 _+ V; F6 nCATIPrtContainer * piPrtCont =
(CATIPrtContainer*) spInitOnDoc->GetRootContainer("CATIPrtContainer");
// 得到零件指针
CATIPrtPart_var spPart = piPrtCont->GetPart();
' S' h  f* P; H) t$ m# o# r
# Z) j! ]. [0 H- v创建草图
; z+ u* u  \0 _//初始化草图工厂
CATISketchFactory_var spSketchFactory(piPrtCont);
//在XY plane 上创建草图
  d( n: H4 \- i& b, c) v# QCATISketch_var spSketch = spSketchFactory->CreateSketch(spRefPlanes[1]));

+ n! r, o! U' S3 r创建草图几何
" x, {+ C7 @. r- z( m7 t  w( Z//首先声明编辑草图
% _. I( z; z0 ^* i7 w4 TspSketch->OpenEdition();
CATI2DWFFactory_var sp2DFactory(spSketch);
//这里表示圆心点
double iPoint[2] = {0.,0.};
( S6 E/ r+ c: _//下面创建圆圈
CATISpecObject_var spLine = spSketch ->CreateCircle(iPoint,_Editor003->GetFloatValue());
CATI2DCurve_var spCurveOnLine(spLine);
spCurveOnLine->GetStartPoint();
spCurveOnLine->GetEndPoint();
//然后退出草图：
spSketch->CloseEdition();
3 Z' d2 r3 A# W& Q! w8 K8 z# \' {

创建约束
7 o6 Z# r! R* xCATI2DConstraintFactory_var spConstraint2DFactory(spSketch);
//定义spLine1 的半径约束
/ g7 A5 z; |& j! q/ }6 J4 IspConstraint2DFactory->CreateConstraint(spLine, NULL, NULL, NULL, NULL, NULL,
NULL, Cst2DType_Radius, 0, 0 );
//定义spLine1 与坐标原点的同心约束
9 A( v' d% F2 H5 L4 LCATI2DAxis_var spSupport = NULL_var;
spSketch->GetAbsolute2DAxis(spSupport);
) E0 s0 F& t1 E1 y+ p" P
2 b* u1 \. ?$ }spConstraint2DFactory->CreateConstraint(spLine, NULL, spSupport->GetOriginPoint(),
7 }' H4 f7 L0 K! B4 t* w9 X+ JNULL, NULL, NULL, NULL, Cst2DType_Concentric, 0, 0 );
0 y0 ^0 F5 P" i  P  M# g
2 V: {6 W! E" k& {
创建凸台
// 从编辑框中获得援助的高度
# `. i( r* @3 ?$ E2 U; Pdouble firstLimit = _Editor004->GetFloatValue();
4 ~, {' `* ^9 i. \3 Hdouble secondLimit = 0.;
. z  L4 E' Z4 N9 M8 B//圆柱的轴向方向为Z 轴方向
CATMathDirection dirZ(0., 0., 1.);
6 ]; |0 q( ^# B9 K; G4 x- b* E! H# i//初始化零件工厂
CATIPrtFactory_var spPrtFactOnPrtCont(piPrtCont);
//创建凸台
CATISpecObject_var spSpecObj = spPrtFactOnPrtCont->CreatePad(spSketch);
CATIPad_var spPadOnSpecObj(spSpecObj);
2 ~) j  W7 }5 q//设置拉伸方向
0 i$ M4 C# P7 H* LspPadOnSpecObj->ModifyDirection(dirZ);
//设置凸台第一限制类型
! o% {0 {& w9 k8 h* ZspPadOnSpecObj->ModifyEndType(catOffsetLimit);
//设置凸台的高度
7 o0 G* H! X+ h; `  k% \$ k" MspPadOnSpecObj->ModifyEndOffset(firstLimit);
. q+ ?* r; Y- t2 t2 b2 r//设置凸台第二限制类型
3 T! f8 }" e& Y5 b4 VspPadOnSpecObj->ModifyStartType(catOffsetLimit);
* J- {- k; Z2 r6 V4 j  U7 J( WspPadOnSpecObj->ModifyStartOffset(secondLimit);
//将凸台添加在结构树中
spSpecObj->Update();
CATIGSMProceduralView_var ispProcView = spSpecObj;
5 F' j8 C& v+ E! R3 h5 ?if (NULL_var != ispProcView ) {HResult rc = ispProcView ->InsertInProceduralView();}