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

admin

创建参数和公式
) L- Y. k! l1 T1．创建参数
! A  g: N  }/ A* x//初始化CATICkeParmFactory 工厂
; C( Z0 _) w7 I2 K0 p) z0 xCATICkeParmFactory_var spParmFactory = spContainer;
  o/ M( J9 K/ Z6 j0 ?) u6 wCATICkeParm_var spParam1 = spParmFactory->CreateLength("Base",0.1);
+ [2 I9 k- @7 p7 J; V2 l9 TCATICkeParm_var spParam2 = spParmFactory->CreateLength("Width",0.15);//长度单位为米
/ t. P& k5 T, m/ FCATICkeParm_var spParam3 = spParmFactory->CreateLength("Height",0.2);//创建长度参数
# m7 o6 q7 q( E2 R7 `" M. P7 r// CATIParmPublisher 与CATICkeFunctionFactory 功能为将所有参数显示在结构树中
CATIParmPublisher_var spParmPublisher = NULL_var;
  M. [6 _  l2 ]! D( k# I; CCATICkeFunctionFactory_var spFuncFactory =CATCkeGlobalFunctions::GetFunctionFactory();
spParmPublisher=
. C- O% f, ?4 h0 ]4 E! l$ U& pspFuncFactory->GetCurrentSet(CATICkeFunctionFactory:arameter,spPrtPart,CATCke::True);
; T/ u) a5 s5 W5 {) YspParmPublisher.Append(spParam1);
& X- G. @9 H- M+ `2 o" Z0 j" [, m  tspParmPublisher.Append(spParam2);
, x9 F- i2 W) EspParmPublisher.Append(spParam3);
2．创建公式
3 G6 [, s2 @, M" N5 \7 U& G//创建参数列表
  j7 A: E: R1 E( _# H7 NCATCkeListOfParm pList;
$ g2 r2 z  {4 Z: J( y% {pList->Append (spParam1);
1 ?* x/ \  X! r+ `3 Q6 b3 @pList->Append (spParam2);
# x! O5 c) `- VpList->Append (spParam3);
//创建公式Height = Width + Base
CATICkeRelation_var spFormula1 = spParmFactory->CreateFormula("Formula","","",
spParam3, pList, "Width+Base", spParmPublisher, CATCke::True);
spFuncFactory->AddToCurrentRelationSet(spFormula1, spParmPublisher);
//修改参数进行测试
. P6 w. d! i5 T& N/ W9 xspParam1->Valuate(0.5);