一种图纸材料表自动生成方法与流程

1.本发明涉及计算机程序及工程设计技术领域，尤其涉及一种图纸材料表自动生成方法。


背景技术：

2.在常规的工程设计中，绘制图纸材料表通常是以手工的方式进行，同一单位或部门也无法保证其格式统一。而手工计算、修改材料表数据，更难以保证其结果的正确性。因此，如何高效、规范、准确地处理材料表就显得极为重要。


技术实现要素：

3.本发明提供了一种图纸材料表自动生成方法，利用autocad的autolisp模块及visuallisp模块进行二次开发，使得autocad程序增加以下功能：生成材料表表头、生成材料表表格、生成材料表表格附页、对若干数值图元求乘积以及对若干数值图元求和；从而规范图纸材料表格式，保证材料表数值运算的正确性，提高工作效率，提升用户体验。
4.为了达到上述目的，本发明采用以下技术方案实现：
5.一种图纸材料表自动生成方法，利用autocad的autolisp模块及visuallisp模块进行二次开发，在autocad程序中增加以下功能模块：
6.1)材料表表头模块，用于生成材料表表头；方法为：根据用户输入的材料表位置信息，首先计算生成材料表头所需的26个点的坐标，绘制材料表头，在材料表头中分别写入项目名称，包括中文及对应的英文；
7.2)材料表表格模块，用于生成材料表表格；方法为：根据材料表的件数信息，计算生成材料表表格所需的8个点的坐标，循环生成材料表表格；
8.4)材料表表格附页模块，用于生成材料表表格附页；方法为：根据材料表位置信息计算生成材料表表格附页所需的7个点的坐标，根据起始件号、终止件号循环生成材料表表格附页；
9.5)求乘积模块，用于对若干数值元素求乘积；方法为：定义临时变量j＝1.0，然后提示用户多选需要求乘积的图元，循环判断每一个图元是否为“text”或“mtext”，如果是，提取该图元的文本属性，判断该文本是否为数值，如果是，令j＝j*该数值；循环完成后，j即为需要的结果；然后，提示用户输入一个点坐标，如果该坐标指向的图元为“text”或“mtext”，则将其文本属性改为j；否则，新建图元，设置其文本属性为j；最后提示用户共有多少个图元相乘，结果为多少；
10.6)求各模块，用于对若干数值元素求和；方法为：定义临时变量h＝0，然后提示用户多选需要求和的图元，循环判断每一个图元是否为“text”或“mtext”，如果是，提取该图元的文本属性，判断该文本是否为数值，如果是，令h＝h 该数值；循环完成后，h即为需要的结果；然后，提示用户输入一个点坐标，如果该坐标指向的图元为“text”或“mtext”，则将其文本属性改为h；否则，新建图元，设置其文本属性为h；最后提示用户共有多少个图元相加，
结果为多少。
11.生成材料表表头时，所述项目名称包括“明细表”、“总质量kg”、“件号”、“图号或标准号”、“名称”、“数量”、“材料”、“质量”、“单”、“总”、“备注”。
12.所生成的材料表元素均具有无名块属性。
13.与现有技术相比，本发明的有益效果是：
14.利用autocad的autolisp模块及visuallisp模块进行二次开发，使得autocad程序增加以下功能：生成材料表表头、生成材料表表格、生成材料表表格附页、对若干数值图元求乘积以及对若干数值图元求和；从而规范图纸材料表格式，保证材料表数值运算的正确性，提高工作效率，提升用户体验。
附图说明
15.图1是本发明实施例所生成的材料表表头及材料表表格。
16.图2是本发明实施例所生成的材料表表格附页。
17.图3是本发明实施例填写数据后的材料表。
18.图4是本发明实施例最终生成的终材料表。
具体实施方式
19.本发明所述一种图纸材料表自动生成方法，利用autocad的autolisp模块及visuallisp模块进行二次开发，在autocad程序中增加以下功能模块：
20.1)材料表表头模块，用于生成材料表表头；方法为：根据用户输入的材料表位置信息，首先计算生成材料表头所需的26个点的坐标，绘制材料表头，在材料表头中分别写入项目名称，包括中文及对应的英文；
21.2)材料表表格模块，用于生成材料表表格；方法为：根据材料表的件数信息，计算生成材料表表格所需的8个点的坐标，循环生成材料表表格；
22.4)材料表表格附页模块，用于生成材料表表格附页；方法为：根据材料表位置信息计算生成材料表表格附页所需的7个点的坐标，根据起始件号、终止件号循环生成材料表表格附页；
23.5)求乘积模块，用于对若干数值元素求乘积；方法为：定义临时变量j＝1.0，然后提示用户多选需要求乘积的图元，循环判断每一个图元是否为“text”或“mtext”，如果是，提取该图元的文本属性，判断该文本是否为数值，如果是，令j＝j*该数值；循环完成后，j即为需要的结果；然后，提示用户输入一个点坐标，如果该坐标指向的图元为“text”或“mtext”，则将其文本属性改为j；否则，新建图元，设置其文本属性为j；最后提示用户共有多少个图元相乘，结果为多少；
24.6)求各模块，用于对若干数值元素求和；方法为：定义临时变量h＝0，然后提示用户多选需要求和的图元，循环判断每一个图元是否为“text”或“mtext”，如果是，提取该图元的文本属性，判断该文本是否为数值，如果是，令h＝h 该数值；循环完成后，h即为需要的结果；然后，提示用户输入一个点坐标，如果该坐标指向的图元为“text”或“mtext”，则将其文本属性改为h；否则，新建图元，设置其文本属性为h；最后提示用户共有多少个图元相加，结果为多少。
25.生成材料表表头时，所述项目名称包括“明细表”、“总质量kg”、“件号”、“图号或标准号”、“名称”、“数量”、“材料”、“质量”、“单”、“总”、“备注”。
26.所生成的材料表元素均具有无名块属性。
27.本发明所述的一种图纸材料表自动生成方法中，用户通过选择若干具有数值属性的图元，可以求其乘积，并在指定位置生成带有乘积结果的新图元，或者将具有文本属性的图元的文本属性修改为乘积结果。同样，用户通过选择若干数值属性的图元，可以对其求和，并在指定位置生成带有求和结果的新图元，或者将具有文本属性的图元的文本属性修改为求和结果。
28.以下实施例在以本发明技术方案为前提下进行实施，给出了详细的实施方式和具体的操作过程，但本发明的保护范围不限于下述的实施例。
29.【实施例】
30.本实施例中，图纸材料表生成过程如下：
31.1.利用材料表表头模块、材料表表格模块，根据用户输入的材料表位置信息，首先计算生成材料表头所需的共26个点的坐标，绘制材料表头，分别写入“明细表”、“总质量kg”、“件号”、“图号或标准号”、“名称”、“数量”、“材料”、“质量”、“单”、“总”、“备注”及相应的英文图元。
32.2.利用材料表表格模块，根据材料表件数信息，计算生成材料表表格的共8个点的坐标，循环生成材料表表格。
33.为方便操作，将上面生成的所有图元转换为无名块。
34.本实施例中，根据需要生成预设的文本，即按顺序、格式生成“1-图号或标准号”、“2-名称”、“3-数量”、“4-材料”、“5-单”、“6-总”、“7-备注”、“8-总质量”等图元，生成材料表表头，如图1所示。
35.3.根据需要，利用材料表表格附页模块，根据材料表位置信息计算生成材料表表格附页所需的共7个点的坐标，根据起始件号、终止件号循环生成材料表表格附页，如图2所示。
36.为方便操作，应将上面生成的所有图元转换为无名块。
37.4.在填写材料表数据时，可以先不修改件数大于1的“6-总”项目，如图3所示。
38.对于件数大于1的“6-总”项目，可以利用求乘积模块。例如对于件号2，先多选图元“4”、图元“6.72”，确定，选择图元“6-总”，此时求乘积模块计算“4*6.72”得到“26.88”，然后将“6-总”修改为“26.88”。以此类推，完成所有件数大于1的“6-总”计算。
39.5.利用求和模块，先多选“质量-》总”列的所有图元，确定，选择图元“8-总质量”，此时求和模块计算待求和图元的总和，得到“64333.63”，然后将“8-总质量”修改为“64333.63”。
40.生成的材料表如图4所示。
41.以上所述，仅为本发明较佳的具体实施方式，但本发明的保护范围并不局限于此，任何熟悉本技术领域的技术人员在本发明揭露的技术范围内，根据本发明的技术方案及其发明构思加以等同替换或改变，都应涵盖在本发明的保护范围之内。