Catia二次开发源码分享：创建参数和公式

admin

创建参数和公式
" R8 U7 q7 l( {0 w1．创建参数
. m7 H; C, g  ^//初始化CATICkeParmFactory 工厂
; }" u; g$ S7 oCATICkeParmFactory_var spParmFactory = spContainer;
; u5 x- \, [# R$ ?CATICkeParm_var spParam1 = spParmFactory->CreateLength("Base",0.1);
CATICkeParm_var spParam2 = spParmFactory->CreateLength("Width",0.15);//长度单位为米
8 Q* y' i$ s9 ]( `9 W! gCATICkeParm_var spParam3 = spParmFactory->CreateLength("Height",0.2);//创建长度参数
5 u# m% P7 e8 b  q8 _// CATIParmPublisher 与CATICkeFunctionFactory 功能为将所有参数显示在结构树中
- D" X% ]1 \. x  E4 Z5 |' R1 x7 Y% o+ eCATIParmPublisher_var spParmPublisher = NULL_var;
) s# v4 `" K- P1 _CATICkeFunctionFactory_var spFuncFactory =CATCkeGlobalFunctions::GetFunctionFactory();
- y  Y0 |# r) `9 v- s% @spParmPublisher=
. B4 p( I! k) m1 aspFuncFactory->GetCurrentSet(CATICkeFunctionFactory:arameter,spPrtPart,CATCke::True);
8 h% ~+ J; n2 \. q% ?spParmPublisher.Append(spParam1);
/ [: ^& m' d- m+ bspParmPublisher.Append(spParam2);
' Z, J# S2 Y4 z( N# y5 HspParmPublisher.Append(spParam3);
2．创建公式
//创建参数列表
CATCkeListOfParm pList;
, ^' N  ?) I+ G! {pList->Append (spParam1);
pList->Append (spParam2);
: a2 X( k7 d6 d$ EpList->Append (spParam3);
! S, l5 M+ Z7 M3 j. c* x. b//创建公式Height = Width + Base
' B) U. [) E! B: G1 D5 UCATICkeRelation_var spFormula1 = spParmFactory->CreateFormula("Formula","","",
5 y* ^- j4 }* a" c: CspParam3, pList, "Width+Base", spParmPublisher, CATCke::True);
spFuncFactory->AddToCurrentRelationSet(spFormula1, spParmPublisher);
" P; E1 r; W+ B! n7 S& ]8 a& M//修改参数进行测试
( @8 x: M; P, U% H$ {' I/ dspParam1->Valuate(0.5);