使用 EKL 创建产品节点树.zip
大小:1.02KB
价格:46积分
下载量:0
评分:
5.0
上传者:Watermanda
更新日期:2025-09-22

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

资源文件列表(大概)

文件名
大小
创建产品结构树.txt
1.59KB
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 == "" breaknodeName = 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)}}}

用户评论 (0)

发表评论

captcha