吸收塔壁板展开图管口自动定位绘图软件开发

杨秀杰

（中国大唐集团科技工程有限公司北京100097）

吸收塔壁板展开图管口自动定位绘图软件开发

杨秀杰

（中国大唐集团科技工程有限公司北京100097）

本文利用VB.NET对计算机绘图软件AutoCAD进行二次开发，编写完成了方便适用的自动定位绘图软件。该软件应用十分方便快捷，使用时设计人员只需将相关数据输入Excel表格，软件自动读入数据后立即可得到壁板展开图管口定位分布，减轻了设计人员人工输入的繁杂工作，可大大提高工作效率，降低劳动强度，节约设计时间。

吸收塔；VB；AutoCAD；二次开发

1 引言

吸收塔是湿法脱硫（WFGD）工艺的核心设备，其结构形式为大型薄壁结构，在设计中需要考虑焊接工艺等问题较多，其中壁板排板设计是保证塔体设计安全的前提。

吸收塔壁板排板图绘制过程中，首先需要设计人员把所有管口在展开图中定位绘制出来，然后再布置板宽及板长以最大限度地避免管口开在焊缝位置。脱硫吸收塔开孔接管非常多，在展开图中定位绘图相当耗时。本文将介绍管口自动定位绘图软件的开发，该软件将由管口表格作为输入数据，程序自动根据管口表的数据在展开图中完成管口定位绘图，十分方便快捷，可大大提高设计工作效率。

2 技术原理

吸收塔设计中施工图的绘制一般都使用AutoCAD软件完成。AutoCAD是目前世界上广泛应用于各种工程制图等有关领域的功能强大的计算机辅助绘图软件。但由于其通用性较强，造成在专业性较强的领域的功能削弱。虽然其建模绘图功能强大，但真正具有工程实际意义的图形拓扑结构信息和参数约束信息在软件中不能反映。因此，在工程项目设计中需要结合企业的实际情况，开发出针对某一特定产品的AutoCAD应用软件，实现依靠单一Au to-CAD软件不能或不易达到的功能，解决实际工程问题。应用VB开发工具进行AutoCAD二次开发具有很大的优势。VB是一种面向对象的可视化编程工具，拥有快速的开发环境，具有界面清晰、语法简单、功能强大的特点，同时还能够弥补AutoCAD软件在其他方面的不足。Autodesk在Auto－CAD R14以后版本中设置了VB开发工具接口，使用户可以在VB语言环境下对AutoCAD进行二次开发。VB.NET是微软最新推出的VB开发平台，具有众多优点。基于.NET框架平台对AutoCAD进行二次开发，可充分利用.NET的各种技术优势，在保证功能强大的前提下，大大提高软件开发速度。

NET是微软大型分布式软件系统开发战略，其核心组成部分是.NET框架，即一个用于Internet的组件模型。NET框架中所有其他功能得以实现的基础是. NET Framework类库，其是一个与公共语言运行库紧密集成的可重复使用的类型集合。.NET框架中的“类”为开发人员提供了一个统一的、面向对象的、层次化的、可扩展的类库集。组件模型可以使软件的每个组成部分使用不同的编程语言编写，最后组合成一个可以运行的软件系统。NET框架不仅代表了软件界复用、重组、互操作研究的发展方向，也给制造业等相关软件应用开发和集成带来了巨大影响。Microsoft NET框架为开发人员提供了一个非常方便的开发环境，从而大大简化了其网络服务的建立、部署及发展。在AutoCAD软件中，对象是分层次的，这个分层结构是用户应用程序能够操作的对象模型，其中对对象的操作都是依据对象模型的分层关系来逐级操作的。

本绘图软件采用VB.NET开发人机交互界面，使用Microsoft Excel作为原始数据文件。首先利用VB. NET对Microsoft Excel的数据读取完成设计数据导入，然后主绘图程序采用VB.NET对计算机绘图软件AutoCAD进行二次开发，编写方便适用的自动定位绘图软件。

3 对AutoCAD的开发过程

ActiveX Automation是微软公司推出的一个技术标准，它适用于OLE对象和ActiveX对象，它可以准许一个应用程序操纵另一个应用程序中实现的对象，通过两个程序间安排对话的方法达到一个程序控制另一个程序的目的。这两个程序在操作系统进程中是不平等的，一个是客户程序，另一个是服务程序。客户程序是操纵和控制者，服务程序是被控制者。本绘图软件开发中VB.NET就是客户程序，而AutoCAD是服务程序。应用VB.NET开发AutoCAD软件应用程序的一般步骤是：先连接AutoCAD，然后定义AutoCAD对象模型，最后编写AutoCAD应用程序。

由于VB.NET与AutoCAD运行在不同的内存空间，所以进行二次开发时必须先将其与AutoCAD进行连接，即引用AutoCAD中的对象、属性和方法的库文件，该库文件并不保存对象本身，只保存创建该对象的相关信息。AutoCAD应用程序对外展示的对象按树状结构按层次展开，它们依次为Application对象、Document对象、Model Space对象和Paper Space等深层次对象。其中，顶层对象为AutoCAD Application，是引用其他对象的基础。软件开发时，创建VisualBasic.NET项目后，打开项目菜单选择添加引用，然后选择COM，再复选AutoCAD Type Library，最后编写VB程序代码，创建AutoCAD对象，启动运行Auto-CAD。

4 程序结构

采用VB.NET开发人机交互界面，主绘图程序对计算机绘图软件AutoCAD进行二次开发，编写吸收塔管口自动定位绘图软件，程序过程如下图1所示：

图1 程序结构图

使用软件直接输入吸收塔直径等基本设计参数数据，然后使用Excel文件读入开孔数据未见，主绘图程序自动判断AutoCAD是否运行，如未运行，程序自动启动AutoCAD程序，然后程序打开底图文件，完成展开图管口定位绘制。

5软件开发实例

软件开发的启动AutoCAD部分代码如下所示：

Dim acadapp As AutoCAD.AcadApplication

Dim acaddoc As AutoCAD.AcadDocument

Dim acadobj As AutoCAD.AcadObject

Try

acadapp=GetObject(,"AutoCAD.Application")

Catch ex As Exception

acadapp=CreateObject("AutoCAD.Application")

End Try

软件开发完成的界面如下图2所示，界面中需要输入吸收塔直径、高度、地脚螺栓以及是否有变径等数据，然后点击“导入开孔数据”按钮即可选择Excel文件读入开孔数据。

图2 软件界面

软件界面中基本参数数据及开孔数据导入完成后，点击“绘图”按钮即可完成吸收塔壁板展开管口自动定位图，如图3所示。

图3 自动生成的图纸

结语

本文利用VB.NET对计算机绘图软件AutoCAD进行二次开发，编写完成了方便适用的自动定位绘图软件。该软件针对吸收塔管口表可完成在壁板展开图中自动定位绘制管口，为设计人员对壁板排板图设计提供准备工作。

[1]曾洪飞，张帆，卢择临.AutoCAD VBA&VB.NET开发基础与实例教程，中国电力出版社，2008年第一版

[2]陈立新,赵红梅.基于VB.NET的AutoCAD二次开发，计算机应用，2006（6），13-15