首页下载资源移动开发3DE 知识工程 - 使用 EKL 创建产品节点树

ZIP3DE 知识工程 - 使用 EKL 创建产品节点树

Watermanda1.02KB需要积分:1

资源文件列表:

使用 EKL 创建产品节点树.zip 大约有2个文件
  1. 创建产品结构树.txt 1.59KB
  2. XX产品节点树.csv 508B

资源介绍:

源代码及参考文件
iRoot : VPMReference -------------------------- let i(Integer) let nodeLevel(String) let nodeName(String) let nodeType(String) let rowData(List) let currentLevel1(VPMReference) let currentLevel2(VPMReference) let currentLevel3(VPMReference) let nodeInstance(VPMInstance) let dataSheet(DTSheetType) dataSheet = CreateSheet("D:\XX产品节点树.csv") let dataList(List) for i = 1 while i <=999 { nodeLevel = dataSheet->CellAsString(i, 1) if nodeLevel == "" break nodeName = dataSheet->CellAsString(i, 2) nodeType = dataSheet->CellAsString(i, 3) dataList.Append(List(nodeLevel, nodeName, nodeType)) } for i = 1 while i <= dataList->Size() { set rowData = dataList->GetItem(i) set nodeLevel = rowData->GetItem(1) set nodeName = rowData->GetItem(2) set nodeType = rowData->GetItem(3) if nodeLevel == "1" { if nodeType == "产品" { set nodeInstance = new("VPMReference", nodeName, iRoot) set currentLevel1 = nodeInstance.Reference } else if nodeType == "零件" { new("3DPart", nodeName, iRoot) } } else if nodeLevel == "2" { if nodeType == "产品" { set nodeInstance = new("VPMReference", nodeName, currentLevel1) set currentLevel2 = nodeInstance.Reference } else if nodeType == "零件" { new("3DPart", nodeName, currentLevel1) } } else if nodeLevel == "3" { if nodeType == "产品" { set nodeInstance = new("VPMReference", nodeName, currentLevel2) set currentLevel3 = nodeInstance.Reference } else if nodeType == "零件" { new("3DPart", nodeName, currentLevel2) } } }
100+评论
captcha