图纸集管理器

lkaervek · 发表于 2014-5-29 13:17:09

整理图纸

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复

lkaervek · 发表于 2014-6-5 17:29:37

上周，我开始用VB.NET深入研究图纸集的世界
我对编码很在行，但不太在行，我对VB.NET也不是很精通
我对Lisp有了更多的经验，但当我开始深入研究图纸集管理器时，我意识到.NET将是最好的选择
我的最终目标是有一个程序，可以自动为我的所有工作表编号
我有可以工作的代码，但问题是，它需要设置图纸集，以使规程按特定顺序排列，我将向您说明原因
我的代码获取一个图纸集数据库，然后我在其上使用枚举器来遍历所有项目，如下所示：
做而不做项目图纸集什么都不是。
“如果对象是工作表，则递增计数器。
如果设置了itemsheet。GetTypeName（）＝“AcSmSheet”，然后
nSheetCount=nSheetCount+1
sheet=itemSheetSet
sheetProps=sheet.GetCustomPropertyBag
SheetNumCode=sheet.GetNumber
SheetNameList.Add（SheetNumCode）
如果
itemSheetSet=enumerator.Next（）
循环
这将构建一个包含所有图纸代码（图纸）的列表
但这些图形在数据库对象中的存储顺序似乎是随机的，因此我有一个混乱的图形列表
然后我不得不编写一些代码来整理我的列表，这样我就可以先用“G-”表、然后是“D-”表，然后是“C-”表等顺序重新构建它。
问题是，我们有一些工作不遵循相同的规则布局
例如，某些作业会根据建筑或位置将图形分组到子集中
在冗长的解释之后，它实际上归结为：
如何让AutoCAD按照在图纸集管理器中看到的相同顺序提供图纸列表
我认为这不会太难，因为AutoCAD必须按顺序向用户显示它们，所以它必须在那里的某个地方，对吗？