stas软件视窗界面开发研究

《stas软件视窗界面开发研究》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、第四部分：交遇信息工程及控制一．，‘‘，^·√一¨

2、．‘e．⋯一一r’，。，，‘o·，一矿o。，√⋯。rr一’F中-'，^’STAS软件视窗界面开发研究魏志强(中国民用航空学院空管学院，天津300300)摘要：波音公司提供的标准起飞分析软件(StandardTakeoffAnalysisSoft'ware．STAS)可以计算飞机的起飞性能。但在计算前需要安严格的格式编写输入文件。由于计算参数之问相互限制和影响，使得编写的输入文件极易出错。本文研究如何使用Delphi开发工具来制作STAS的中文界面，通过用户的

3、选择输入，生成正确的输入文件；通过使用API函数和设置挂钩来调用DOS下的STAS计算程序，完成性能计算和分析。关键词：起飞性能计算；API函数；程序调用；挂钩0引言波音公司提供的标准起飞分．眵诤滞STAS(StandardTakeoffAnalysisSoftware—STAS)可以用来计算飞机的起飞性能。目前有DOS和WINDOWS版(BPs)两种。由于WINDOWS版的计算程序尚不完善，耳前各航空公司主要还是使用DOS版的计算程序。DOS版的程序在计算前需要用户按照—定的格式编写输入文件，输入有关机型数

4、据库、计算条件(OPTIONS)、飞栅构形(CONFIGURATION)、大气条件、机场条件等信息。由于各种计算参数之间互相限制，互相影响，导致输入文件极易出错，提高了软件的使用难度。Delphi是由Inprise(原Borland)公司推出的一j胂基于Object-Pascal语言、功能强大、使用灵活的日乇速应用程序开发工具(RAD)，支持API、DLL、ActiveX等技术标准，可以用来快速地开发出高效的用户界面，具有很强的数据库、网络开发能力。本文研究如何开发STAS软件的中文界面，i百过用户在界面上的

5、选择、输入，自动生成输入文件，并通过分析输^的参数之间的关系，判断参数的取值是否有冲突。然后通过API函数创建新的进程来调用DOS下的STAS程序，进行性能计算和分析。由于DOS下的STAS计算程序在执行时需要用户通过键盘敲^输入文件名和输出文件名，因此还需要j百过设置挂钩来模拟键盘的输入，并通过消息发送给STAS，实现与STAS的会话。1STAS中文界面的创建1．1软件的体系结构起飞性能计算时需要输入的参数比较多，需要，l介窗体才能完成。由于柳场数据对其他参数的取值没有什么影响，因此可放在第。卟窗体中；而参

6、数的取值有粗限制的主要是POPT数组和CONF中的襟翼数据，因此将他们放在第二个窗体中；输出格式受POPT数组和CONF中襟翼数据的影响，因此可放在第三个窗体中；输出格式的选择又对风速的个数有影响，可将风速输入卡放在了第四个窗体中。本软件利用MDI进行窗体的切换。在应用程序中MDI窗体只有—个主窗体(相当于容器)，用来容纳其他的子窗体。在程序运行时，首先打开第—个子窗体，然后通过用户的选择，依次雠苣蝴体。创建窗体的例子如下：tform2．Create(application)；衍开FORM2子窗体close；

7、／／翔原来的窗体1．2参数之间的限制关系及实现在编写STAS的输入文件时，需要各参数之间的取值限制。比如如果道面类型选择污染跑道(积水、积雪等)时，起飞推力类型就不能选择减推力；对于BTM模块，当计算类型选择为‘‘计算签派重量”时，决断速9312005·8中国·大连中国交通研究与探索(2005)一第六j全国交通运输领域青年学术全议论丈善÷’，’；一。。，“I．，矿-·_一·：70+￥o—v⋯'一一。，’／·’⋯⋯+’v口㈨，v}，．～。一．二，r，7稽’·y．y，∥j帕”一，，度不能取‘按固定的V1／VR计算

8、”或‘铝溻佳的V1／VR计算”，如果选择按平衡场地长度计算则必须考虑Vmcg限制等。参数限制的实现，是在点击POPT和CONF输入界面的“下一步”按钮来实现。先让K的值取0，写出口语句进行判断，如果输^的参数不受限制，则K的值不变，如果之前输人的参数受到限制，则让K的值等于K+1骺判断K的值是否还等于0。如果等于，则表示之前输入的各参数相互之间没有限制，可以进入下—个界面的输．入；否则如果K的值大于0，就表示受到其中某些条件的限制，那么就会弹出提示框，要求用户继续检查，而不会进入下—个输入界面。见下面例子：K

9、：=O；W((POPT．CALCOPTIONd5')AND((POPT．V1VRCHOISEd0’OR(POPT．V1VRCHOISE冒DO即OPtVlⅥ屺HoISEd7∞)THENBEGNK：--K+I；SHOWMESSAGE('¨·POPT(1户5时，P()PT(5)不能取0、6、71’)；END；IFK=0’IHENBEGINfform2．Create(appLication)；∥进入下—个输