一种向工艺流程图中自动批量添加编号的方法与流程

1.本发明涉及工艺数据处理技术领域，特别是涉及一种向工艺流程图中自动批量添加编号的方法。


背景技术：

2.管道仪表流程图(pid图)借助统一规定的图形符号和文字代号，用图示的方法把工艺流程中用到的全部设备、仪表、管道、阀门、管件按各自功能以及工艺要求使用管线连接起来，以起到描述工艺装置的结构和功能的作用。pid图是在工艺设计的基础上开展工作的，是工程设计的一个重要环节，也是工程设计中各专业开展工作的主要依据。
3.pid图通常是在专业的cad绘图软件中进行的，绘图步骤一般是先把主要设备、仪表、阀门绘制完成，并按照一定的大小和位置放置在流程图中，然后用管线将上述元素连接起来，最后对pid图中的所有元素进行编号。设备、阀门的编号通常称为“位号”，管线的编号称为“管线号”，编号的目的是为了进一步产生设备一览表、管线特性表等数据表格。
4.如图1所示，v101是设备位号，v0105和v0207是阀门位号，pl1006是管线号。目前，向工艺流程图中添加位号的方法主要是手工添加文字，文字的位置和内容要靠人为判断和决定。一般情况下，同类的部件编号是连续的，假设一个图中有多个储罐，位号应该是v101、v102、v103
……
，以此类推。
5.但是，在工艺设计过程中，根据工艺需求，可能需要向现有流程图中增加或删除设备、管线，相应的编号就需要打乱重新编号，效率非常低下，而且容易造成编号重复或者漏写、不连续等后果。
6.目前在工艺流程图的绘制过程中，每一个设备、阀门，每一条管线的编号都是手工编辑文字，一个一个地添加上去，对于后期发生设备、管线增减的情形，再次调整编号的工作量巨大，费时费力。


技术实现要素：

7.为了克服现有技术的不足，本发明的目的是提供一种向工艺流程图中自动批量添加编号的方法。
8.为实现上述目的，本发明提供了如下方案：
9.一种向工艺流程图中自动批量添加编号的方法，包括：
10.根据预设信息调用vba对象模型中的addtext方法，以向流程图中自动插入预设文字；所述预设信息包括插入点、文字内容和文字高度；所述插入点用于确定编号的位置；所述文字内容用于显示各个被编号部件的所述编号；各个所述被编号部件的编号不同。
11.优选地，在所述根据预设信息调用vba对象模型中的addtext方法，以向流程图中自动插入预设文字之前，还包括：
12.提取当前图纸中所有的图层名称和文字样式名称；
13.根据所述图层名称和所述文字样式名称确定所述文字内容的属性。
14.优选地，所述向流程图中自动插入预设文字，包括：
15.采用getboundingbox方法获取被编号部件所在矩形的左下角点坐标和右上角坐标；
16.根据所述左下角点坐标和所述右上角坐标进行计算，以确定所述插入点的位置，实现所述文字内容出现在所述被编号部件的中间位置。
17.优选地，在所述根据预设信息调用vba对象模型中的addtext方法，以向流程图中自动插入预设文字之前，还包括：
18.提取当前图纸中的文字模板；
19.根据所述文字模板确定所述文字内容的输入格式。
20.根据本发明提供的具体实施例，本发明公开了以下技术效果：
21.本发明提供了一种向工艺流程图中自动批量添加编号的方法，包括根据预设信息调用vba对象模型中的addtext方法，以向流程图中自动插入预设文字；所述预设信息包括插入点、文字内容和文字高度；所述插入点用于确定编号的位置；所述文字内容用于显示各个被编号部件的所述编号；各个所述被编号部件的编号不同。本发明保证了编号的连续性，而且只需要在vba对象模型的工具界面中进行简单的参数设置，就可以在短时间内自动添加多个编号。本发明在工程设计行业工艺流程绘制中具备较强的实用性。
附图说明
22.为了更清楚地说明本发明实施例或现有技术中的技术方案，下面将对实施例中所需要使用的附图作简单地介绍，显而易见地，下面描述中的附图仅仅是本发明的一些实施例，对于本领域普通技术人员来讲，在不付出创造性劳动性的前提下，还可以根据这些附图获得其他的附图。
23.图1为现有技术提供的工艺流程局部示意图；
24.图2为本发明实施例提供的方法流程图；
25.图3为本发明实施例提供的vba管理器示意图；
26.图4为本发明实施例提供的自定义菜单示意图；
27.图5为本发明实施例提供的级联菜单系统示意图；
28.图6为本发明实施例提供的用户界面示意图；
29.图7为本发明实施例提供的编号在下方的示意图；
30.图8为本发明实施例提供的编号在右方的示意图；
31.图9为本发明实施例提供的编号旋转显示示意图；
32.图10为本发明实施例提供的图层列表示意图；
33.图11为本发明实施例提供的文字样式列表示意图；
34.图12为本发明实施例提供的尚未编号的流程局部示意图；
35.图13为本发明实施例提供的cad插件菜单系统示意图；
36.图14为本发明实施例提供的用户选项界面示意图；
37.图15为本发明实施例提供的管线编号的添加效果示意图；
38.图16为本发明实施例提供的阀门编号的添加效果示意图。
具体实施方式
39.下面将结合本发明实施例中的附图，对本发明实施例中的技术方案进行清楚、完整地描述，显然，所描述的实施例仅仅是本发明一部分实施例，而不是全部的实施例。基于本发明中的实施例，本领域普通技术人员在没有做出创造性劳动前提下所获得的所有其他实施例，都属于本发明保护的范围。
40.在本文中提及“实施例”意味着，结合实施例描述的特定特征、结构或特性可以包含在本技术的至少一个实施例中。在说明书中的各个位置出现该短语并不一定均是指相同的实施例，也不是与其它实施例互斥的独立的或备选的实施例。本领域技术人员显式地和隐式地理解的是，本文所描述的实施例可以与其它实施例相结合。
41.本技术的说明书和权利要求书及所述附图中的术语“第一”、“第二”、“第三”和“第四”等是用于区别不同对象，而不是用于描述特定顺序。此外，术语“包括”和“具有”以及它们任何变形，意图在于覆盖不排他的包含。例如包含了一系列步骤、过程、方法等没有限定于已列出的步骤，而是可选地还包括没有列出的步骤，或可选地还包括对于这些过程、方法、产品或设备固有的其它步骤元。
42.本发明的目的是提供一种向工艺流程图中自动批量添加编号的方法，保证了编号的连续性，而且只需要在vba对象模型的工具界面中进行简单的参数设置，就可以在短时间内自动添加多个编号。
43.为使本发明的上述目的、特征和优点能够更加明显易懂，下面结合附图和具体实施方式对本发明作进一步详细的说明。
44.图2为本发明实施例提供的方法流程图，如图2所示，本发明提供了一种向工艺流程图中自动批量添加编号的方法，包括：
45.步骤100：根据预设信息调用vba对象模型中的addtext方法，以向流程图中自动插入预设文字；所述预设信息包括插入点、文字内容和文字高度；所述插入点用于确定编号的位置；所述文字内容用于显示各个被编号部件的所述编号；各个所述被编号部件的编号不同。
46.本发明首先须进行功能的加载，本发明是利用vba语言开发的cad插件其中的一个功能，在cad界面中输入命令vbaload，对话框中选择project98.zvb文件即可。然后输入命令vbaman打开vba管理器，如图3所示，即可看到该工程处于加载状态。并且，如图4所示，cad界面自动出现了该插件的菜单。
47.优选地，在所述根据预设信息调用vba对象模型中的addtext方法，以向流程图中自动插入预设文字之前，还包括：
48.提取当前图纸中所有的图层名称和文字样式名称；
49.根据所述图层名称和所述文字样式名称确定所述文字内容的属性。
50.优选地，所述向流程图中自动插入预设文字，包括：
51.采用getboundingbox方法获取被编号部件所在矩形的左下角点坐标和右上角坐标；
52.根据所述左下角点坐标和所述右上角坐标进行计算，以确定所述插入点的位置，实现所述文字内容出现在所述被编号部件的中间位置。
53.优选地，在所述根据预设信息调用vba对象模型中的addtext方法，以向流程图中
自动插入预设文字之前，还包括：
54.提取当前图纸中的文字模板；
55.根据所述文字模板确定所述文字内容的输入格式。
56.本发明是通过vba语言编写的cad插件实现的。其技术原理是调用vba对象模型中的addtext方法向流程图中自动插入文字：
57.function addtext(textstring as string,insertionpoint，height as double)as acadtext；本发明需要传递插入点、文字内容、文字高度这3个参数。其中，插入点用于确定编号的位置，通常显示在被编号的部件的顶部、底部、左侧或右侧附近，另外还需要考虑是否旋转文字。被编号的部件的位置，采用getboundingbox方法来获取：sub getboundingbox(minpoint,maxpoint)；其中，minpoint是部件所在矩形的左下角点坐标，maxpoint是部件所在矩形的右上角点坐标。通过这两个点进行有关运算，就可以实现编号文字出现在部件的中间位置。文字内容则需要事先选择文字模板，如果文字模板是v1#，并且起始编号是7，那么批量编号就是v107、v108等，如果文字模板是pl#-h1e，起始编号是3，那么批量编号依次是pl03-h1e、pl04-h1e等。另外，还需要设计用于编号的文字的图层、文字样式等属性，可以事先提取当前图纸中所有的图层名称、文字样式名称，以供用户选择、灵活定制。
58.具体的，如图5所示，本实施例在功能加载完成后，依次点击菜单“制图助手”、“快速修改”、“批量文字”，即可在cad绘图界面中弹出用于添加文字的用户窗口。
59.本发明的设计方案是利用vba的userform开发的窗口界面与用户交互。主要内容包括：文字添加位置、文字方向、文字内容、文字样式等选项，如图6所示。
60.进一步地，用户可以选择文字显示在设备或管线的上方、下方、左方、右方，也可以勾选“自动”。如果勾选了自动，对于扁平的设备，编号会显示在设备下方，如图7所示。对于瘦长的设备或垂直的管线，编号自动显示在右方，如图8所示。
61.更进一步地，用户还可以选择文字方向。如果勾选了“自动”，对于显示在设备上方或下方的编号，则水平显示文字。对于显示在设备左右两侧的文字，垂直显示文字，如图9所示。
62.此外，文字模板是预先规定的一行文本，其中的#符号会被自动替换为编号值。假设文字模板是并且起始值设置为3，那么产生的连续编号是等。
63.具体的，图层是cad图纸中所有图元都必须具有的属性，本发明所述的插件，预先将当前图纸的所有图层显示在组合框中，如图10所示。当用户选择一个图层，那么批量添加编号时，会自动采用该图层作为编号的图层。
64.进一步地，文字样式是cad中文字或多行文字都具有的属性，规定了文字的名称等内容。本发明所述的插件，预先将当前图纸的所有文字样式显示在组合框中，如图11所示。当用户选择一个文字样式，那么批量添加编号时，会自动采用该样式作为编号的样式。
65.下面以具体的绘图实例来讲解本发明所述插件的用法。假设某工艺流程图的局部有5条管线和5个手动阀门，目前尚未编号，如图12所示。在cad绘图软件的菜单系统中选择“制图助手”、“快速修改”、“批量文字”，如图13所示。弹出“批量添加文字”的用户窗口，如图
14所示。首先为管线添加编号，设置如下：
66.文字模板：
67.起始值：1
68.图层：0
69.样式：仿宋体
70.高度：3.5
71.事先用鼠标选择5条管线，然后点击“批量添加”按钮，即可看到管线下方自动出现了相应的编号，如图15所示。
72.然后为阀门添加编号，设置如下：
73.文字添加位置：顶部
74.文字模板：v#
75.起始值：1
76.图层：0
77.样式：仿宋体
78.高度：3.5
79.事先用鼠标选择5个阀门，然后点击“批量添加”按钮，即可看到阀门上方自动出现了相应的编号，如图16所示。
80.本发明的有益效果如下：
81.(1)兼容性好：本发明基于cad vba语言开发而成，自动添加的编号文字也是标准的cad图元，与手绘的完全兼容。
82.(2)自动化程度高：本发明自动向选中的设备、管线附近添加相应的编号文字，运行效果能够如人所愿。
83.(3)选项丰富：本发明从使用者角度出发，为满足多种工艺设计场景，通过窗口界面的形式设计了文字添加位置、文字方向、文字模板、图层、文字样式等多个选项。
84.(4)操作简便：用户只需要提前选择需要添加编号的设备或管线，在本发明的窗口中点击一下鼠标即可实现编号的添加。
85.本说明书中各个实施例采用递进的方式描述，每个实施例重点说明的都是与其他实施例的不同之处，各个实施例之间相同相似部分互相参见即可。
86.本文中应用了具体个例对本发明的原理及实施方式进行了阐述，以上实施例的说明只是用于帮助理解本发明的方法及其核心思想；同时，对于本领域的一般技术人员，依据本发明的思想，在具体实施方式及应用范围上均会有改变之处。综上所述，本说明书内容不应理解为对本发明的限制。