地铁限界CAD系统设计及关键技术研究论文.docVIP

　　地铁限界CAD系统设计及关键技术研究论文 .freeldb文件复制到用户指定的路径并重命名为项目文件。 用户数据库以项目文件的形式存在,在项目新建时其内容与默认数据库中的内容是一致的。如果用户对车辆限界等信息进行修改,用户数据库会随之更新并用于后续的绘图和设备限界等计算。用户新建图纸后,存储图纸信息、设备限界控制点坐标和建筑限界数据的表会相应地增加记录;删除图纸时,这些记录亦被删除。 在数据库中包含如下6个二维表。 PrjInfo。项目信息表(项目名称、设计时间、设计负责人等); 属于项目级设计内容,对应有项目基本信息、车辆基本信息、车辆轮廓、车辆限界等;“设备限界”和“建筑限界”属于图纸级设计内容,对应有图纸信息、轨道线路参数、设备限界、建筑限界、设备布置等;项目数据和图纸数据都有报表生成功能。程序的运行和用户的操作都应遵循这个原则。根据以上内容,系统功能结构设计如图2所示。 (4)系统数据库设计。系统属于CAD二次开发软件,主要功能是计算和绘图,需要读写的数据量较小。考虑到与VBA的兼容性,本系统采用MicrosoftAccess数据库,数据库访问引擎采用比较成熟的DAO技术。本系统的数据库分为:默认数据库和用户数据库。 默认数据库存与程序文件存放在一起,为DefaultA.mdb、DefaultB1.mdb和DefaultB2.mdb3个文件。从文件名可以看出,这3个文件是与车辆类型对应的,默认数据库记有某种车辆类型的车辆基本信息、车辆轮廓控制点坐VehiInfo。车辆信息表(车辆类型、车体长度、车辆定距、车体长度等); Points。车辆轮廓及车辆限界表(包含车辆轮廓及车辆限界的控制点坐标); Drap文件,该文件的典型内容如下: Operation DVBPath=C:/ProgramFiles/MetroGauges/ 随后程序使用Shell语句运行AutoCAD软件并加载Gauges.dvb工程文件。如果用户选择了“加载后执行VBA程序”,当AutoCAD软件运行并加载Gauges.dvb后,程序向AutoCAD主窗口发送键盘消息“-vabrunStartProgram”以启动系统。程序采用以下方式使工程自动运行。 PublicSubRunMacro() SendKeys“{ESC}”,True SendKeys“{ESC}”,True SendKeys“-”,True SendKeys“V”,True SendKeys“B”,True SendKeys“A”,True SendKeys“R”,True SendKeys“U”,True SendKeys“N”,True SendKeys“”,True SendKeys“S”,True SendKeys“T”,True SendKeys“A”,True SendKeys“R”,True SendKeys“T”,True SendKeys“P”,True SendKeys“R”,True SendKeys“O”,True SendKeys“G”,True SendKeys“R”,True SendKeys“A”,True SendKeys“M”,True SendKeys“{ENTER}”,True EndSub 加载工程前,启动器程序将自身窗口隐藏,完成上述操作后,该程序自动退出。 2)图形绘制技术4,5。本系统大部分的运算工作是通过各种算法计算各控制点坐标,将这些控制点按规则绘图就形成各种限界图形。系统结合AutoCAD的画图工具,实现了自动绘图功能,以下是系统绘图功能的相关技术。 要画图必须先确定画图的起点,可以让程序把点移动到开始点,即设置当前点,以下为设置当前绘制起点函数MoveTo(ptCurrent为当前点): PublicFunctionMoveTo(ptNepSAsPoint DimpEAsPoint pS=ptStart pE=ptEnd DimapStart(2)AsDouble DimapEnd(2)AsDouble apStart(0)=pS.X:apStart(1)=pS.Y:apStart(2)=0 apEnd(0)=pE.X:apEnd(1)=pE.Y:apEnd(2)=0 ThisDraapThis(2)AsDouble apThis(0)=pt.X:apThis(1)=pt.Y:apThis(2)=0 ThisDraptNeicrosoftCorporation.VisualBasic6.0中文版程序员指南,北京:北京希望电脑公司,1999.706～725 4 王钰.用VBA开发AutoCAD2000应用程序,北京:人民邮电出版社,1999.66～109 5 张帆,郑立