[CATIA技巧]CATIA中批量导出点坐标的方法四-知识工程EKL

let i (integer)/*声明一个循环变量i*/

let F (Feature)/*声明一个feature型变量F*/

let lista (List)/*声明一个列表型变量lista*/

let x, y, z (Length)/*声明三个Length型变量x y z*/

lista = Points/*将结构树上的名字为Points的列表赋给lista*/

i=1/*给循环变量赋予一个初始值1*/

for F inside lista/*执行for循环语句*/

{

x=lista->GetItem(i)->coord(1) /*将lista列表中的第i个点的x坐标赋给x变量*/

y=lista->GetItem(i)->coord(2)/*将lista列表中的第i个点的y坐标赋给y变量*/

z=lista->GetItem(i)->coord(3)/*将lista列表中的第i个点的z坐标赋给z变量*/

F=lista->GetItem(i)/*获取列表中的第i个点*/

`关系\设计表.1\图纸` ->SetCell(i,1,F.Name)

/*将第i个点的名字赋给工作表的第i行，第1列*/

`关系\设计表.1\图纸` ->SetCell(i,2,x)

/*将第i个点的x坐标值赋给工作表的第i行，第2列*/

`关系\设计表.1\图纸` ->SetCell(i,3,y)

/*将第i个点的y坐标值赋给工作表的第i行，第3列*/

`关系\设计表.1\图纸` ->SetCell(i,4,z)

/*将第i个点的z坐标值赋给工作表的第i行，第4列*/

i=i+1/*循环变量加1，以备下次循环取点*/

}