登陆注册
36209800000009

第9章 Delphi应用程序设计初步与项目管理(1)

本章要点

设计一个简单的Delphi应用程序

Delphi应用程序的设计步骤

Delphi应用程序项目的组成

Delphi的项目管理

为了使读者在详细了解Delphi应用程序设计的方法之前,对Delphi应用程序的设计尽快有一个感性的认识,本章将通过一个简单的应用程序实例的设计,初步掌握使用Delphi提供的集成开发环境进行程序设计的方法,掌握设计应用程序的步骤,掌握Delphi应用程序的组成,介绍Delphi应用程序的项目和项目管理。

3.1设计一个简单的Delphi应用程序

由于Delphi提供了一个非常方便、实用的集成开发环境,使得Windows应用程序的设计简单了很多。

设计Delphi应用程序,通常需要如下几个步骤:

(1)新建一个应用程序项目;

(2)在窗体中放置需要的组件;

(3)设置窗体和组件的属性;

(4)为对象选定事件并编写事件处理代码;

(5)保存程序文件;

(6)编译、运行、调试程序。

下面通过设计一个简单的Delphi程序实例,具体介绍Delphi应用程序的设计步骤。

3.1.1创建一个新的应用程序项目

Delphi启动后,自动创建一个应用程序项目,这时项目包含自动创建的一个窗体Form1,如图3-1所示,用户可以直接在这个基础上进行应用程序的设计。

要在项目中另外增加新的窗体,可以执行菜单命令(用这种写法表示级联的菜单命令)。

如果在设计中需要创建另一个新的应用程序项目,可以执行菜单命令,或在执行菜单命令后打开的如图3-2所示的对话框中选择【Application】项。

3.1.2在窗体中放置所需要的组件

假设应用程序的要求是:单击程序界面上的【欢迎】按钮,屏幕显示“欢迎使用Delphi6.0!”字样,单击程序界面上的另一个按钮【退出】,退出程序。

根据需要,在窗体中放置两个按钮Button1和Button2;显示字样,可以用编辑框Edit或标签Label,这里用标签Label1。

在窗体中放置组件的方法有两种,其一是第2章介绍过的,执行菜单命令;其二是通常使用的手工方法,具体方法如下。

(1)使用组件模板右端的导航按钮,在组件模板上找到所需组件所在的选项卡,用鼠标单击打开该选项卡。

(2)下面的步骤有两种方法:

在选项卡上找到所需的组件,单击该组件的图标,此时选中的组件图标凹陷,同时对象选择按钮(即每类组件最左端的图标“↖”)弹起,表示一个组件被选中;然后将鼠标指针移到窗体放置组件的位置单击,组件被放置在选定位置。

在选项卡上找到所需的组件,用鼠标左键双击(以下皆简称“双击”)该组件的图标,此时选中的组件被放置在窗体的中心位置;然后用鼠标指针指向组件,按下左键不放,在窗体上拖动鼠标到选定位置,放开鼠标。

如此循环操作,将其他组件依次放置。

(3)根据需要,放置好的组件还可以调整位置。方法是:单击某组件,将该组件激活(组件四周被黑色小方块包围,表示该组件被激活,刚放置的组件呈激活状态);然后用鼠标指针指向组件,按下左键不放,在窗体上拖动鼠标到选定位置,放开鼠标。

放置好了组件的窗体如图3-3所示。

3.1.3设置窗体和组件的属性

窗体常用的属性有Caption、Name及位置、尺寸等,按钮和标签常用的属性有Caption、Name等。

窗体的Caption属性决定窗体标题栏左端显示的窗体的名称,按钮的Caption属性是指我们看到的按钮上的文字,标签的Caption属性就是通常标签上显示的文字;而窗体、按钮和标签的Name属性都是指它们在程序中的标识。

设置对象属性的具体方法如下。

在对象检查器的对象选择列表中选择窗体Form1,在属性选项卡的属性名称列表中找到属性Caption用鼠标单击,然后在右边属性值栏中输入Caption的值,如“欢迎窗口”;窗体的Name可以取默认值Form1,也可以选定其他的值;窗体的位置由属性Top和Left决定,可用同样的方法设置,但通常是将鼠标指针放到窗体的标题栏上,然后按住鼠标左键拖动鼠标来移动窗体的位置;尺寸由属性Height和Width决定,通常将鼠标指针放到窗体的边沿,这时鼠标指针变成双向箭头,然后按住鼠标左键上下或左右移动鼠标,窗体的尺寸就会改变,这样调整窗体的位置和尺寸,既方便又直观。

用同样的方法设置按钮和标签的属性,按钮Button1的Caption属性设为“欢迎”,Name属性就取为默认值Button1;按钮Button2的Caption属性设为“退出”,Name属性就取为默认值Button2;因为按要求,开始标签Label不显示文字,在单击按扭1时才显示“欢迎…”

等字样,所以标签的Caption属性初始值应设为空,Name属性取默认值Label1。为使标签显示的文字的尺寸、字体、颜色合适,还要设置它的Font属性,如前所述,用鼠标单击Font属性值栏右端的【…】小按钮,弹出如图2-77的对话框,通过对话框设置标签中文字的有关属性。

按以上设定,几个对象的属性设置如表3-1所示。

3.1.4为对象选定事件并编写事件处理代码

根据该程序的设计要求,单击【欢迎】按钮应显示“欢迎…”字样,单击【退出】按钮应退出应用程序,所以只为两个按钮选定“单击”事件即可。

在对象检查器的对象选择列表中选择Button1,选择事件选项卡中的“OnClick”(单击)事件,用鼠标双击,则以默认事件名(Button1Click)命名的Button1的单击事件处理代码的程序框架出现在代码编辑窗口中,根据要求,事件处理代码应实现由Label1显示“欢迎…”

字样,在“begin”与“end”之间写入“Label1.Caption:=‘欢迎进入Delphi6.0的世界!’;”

代码段;按同样的方法,选定Button2的单击事件(Button2Click)并写入其事件处理代码“Close;”。

编写完事件处理代码的代码编辑窗口如图3-5所示。

3.1.5保存程序文件

程序设计完成后,或者设计虽未完成而需要中途停止时,需要保存文件。

保存程序文件,执行【File】→【SaveAll】菜单命令,或者用鼠标单击工具栏中的【SaveAll】命令按钮,系统开始保存程序文件。首先保存单元文件,弹出如图3-6所示的【SaveUnit1As】对话框,通过对话框选择保存文件的路径和文件名(可以使用单元文件的默认文件名Unit1),选定后单击【保存】按钮;然后保存项目文件,弹出如图3-7所示的【SaveProject1As】对话框,通过对话框选择保存文件的路径和文件名(可以使用单元文件的默认文件名Project1),选定后单击【保存】按钮,程序文件保存完毕。

3.1.6编译、运行、调试程序

下面就可以编译、运行、调试程序了。

执行【Run】→【Run】菜单命令,或者单击工具栏中的【Run】命令按钮,程序开始运行。按设计要求,单击【欢迎】按钮,显示“欢迎…”字样,如图3-8所示;单击【退出】

按钮,程序应停止运行,关闭窗口。

如果程序设计存在错误,不能正常运行,或虽能正常运行,但运行的结果与设计要求不符,就要对程序进行调试,找到存在的问题,修改程序,直到程序能正常运行、运行结果符合设计要求为止。程序修改后,不要忘记保存文件。

至此,这个简单的Delphi应用程序实例就全部完成了。

同类推荐
  • 信息技术教育大全-计算机网络

    信息技术教育大全-计算机网络

    信息技术教育大全-计算机网络信息技术教育大全-计算机网络信息技术教育大全-计算机网络信息技术教育大全-计算机网络信息技术教育大全-计算机网络信息技术教育大全-计算机网络信息技术教育大全-计算机网络
  • 下一代互联网

    下一代互联网

    本书系统介绍了下一代互联网的进展情况,包括下一代互联网的概念解析,国内外下一代互联网的最新发展情况,下一代互联网的关键技术进展,以及各国发展下一代互联网的政策计划。最后分析了下一代互联网对未来社会的影响,提出我国发展下一代互联网的政策建议等。全书共6章,包括互联网发展历史和现状,下一代互联网基本概念,下一代互联网研究最新进展,下一代互联网发展现状,我国发展下一代互联网现状,发展下一代互联网战略建议。
  • 办公软件高级应用

    办公软件高级应用

    日新月异的信息技术使计算机的应用渗透到各行各业,融入到我们的工作、学习和生活中,特别是在办公领域中运用计算机技术,可以实现办公自动化,成倍地提高工作效率。在众多的办公软件中,微软公司的Office系列软件是办公自动化软件中的佼佼者,其强大的功能深受全世界广大用户的青睐。根据当前业界的需求以及办公软件的实际应用范围,本书针对Office2003系列产品,深入讲解其高级应用知识和操作技能。
  • EDA技术

    EDA技术

    根据课堂教学和实验操作的要求,以提高实际工程设计能力为目的,深入浅出地对EDA技术相关知识作了系统和完整的介绍,相关知识作了系统和完整的介绍。
  • 都是网络惹的祸

    都是网络惹的祸

    本书分网络游戏、网络聊天、网络隐私、网络网吧安全、网络文化、网络语言、网络犯罪、网络陷阱等栏目,从不同的视角探讨了在当今社会的网络现象。
热门推荐
  • 从六场出发(千种豆瓣高分原创作品·看小说)

    从六场出发(千种豆瓣高分原创作品·看小说)

    小说讲述上世纪九十年代的东北林场“六场”里三个结拜少年从小到大各自不同的命运,进而从一个侧面展现了六场的时代变迁。小说分为十个章节,前半部分写六场:纯美、烂漫、如梦如幻。当现代文明入侵这块淳朴大地时,在大时代背景下,故事的主人公们走上了一条“走出林场”的现实之路。后半部分侧重现实的残酷、都市的荼蘼、压抑与迷失,进而前后形成对比,最终诠释出“抵达”还是“出发”?精神层面的前行与出发、抵达与归宿成了作品最终试图寻找的所在。
  • 毒妃邪女

    毒妃邪女

    23世纪她因为一个喷嚏而穿越┻━┻︵╰(‵□′)╯︵┻━┻“卧槽!不是吧!我就不小心打了一个喷嚏而已就把自己炸死了!”穿越到瑞幕大陆,看她如何用毒,医,身手活在那个世上……
  • 搁浅雨季

    搁浅雨季

    被命运绑在一起的两个人,意外的成了势不两立的仇人,又意外的成了误会。最终,是无巧不成书,还是天意如此!
  • 总裁爹地:呆萌宝贝

    总裁爹地:呆萌宝贝

    被继母算计把大boss上了,管你的一言不合就出国。五年后,带着呆萌宝贝强势归来。呆萌宝贝真的那么单纯善良可爱谦虚?错错错错大错特错。
  • 天行

    天行

    号称“北辰骑神”的天才玩家以自创的“牧马冲锋流”战术击败了国服第一弓手北冥雪,被誉为天纵战榜第一骑士的他,却受到小人排挤,最终离开了效力已久的银狐俱乐部。是沉沦,还是再次崛起?恰逢其时,月恒集团第四款游戏“天行”正式上线,虚拟世界再起风云!
  • 被造物主看上了

    被造物主看上了

    造物主还能看上我?别不是渣女吧!?我信你个鬼!!!
  • 关于魔术的那些事

    关于魔术的那些事

    心理咨询师的高岸因为相亲之下遇到了一个沉迷偶像的女孩,他们之间会发生什么事?
  • 夏木青涩间

    夏木青涩间

    每个人,都有美好的初恋,而我的初恋给了初中校草。在一次无意中的撕逼的人,在学校值日说了一句快点,要上课了。把扫把递给他的人,成了她之后的男票!被老师体罚,在操场跑步,虽说是全班体罚,但是他却陪着她一块跑完,一句你长的太好看太招人了所以请你不要再跟着我了,我怕被人误会我们有什么。就让他停下脚步与她从此断了联系?哪怕的QQ也不曾点开关于她的一切难道她也一样?被逼到小巷却是他挺身而出,而之后两人的关系依旧如此?一句我只是刚好路过,不喜欢看见女生打女生才出手相救而已,你不要误会什么。就让她大哭一场?她的一句我玩够了,你也玩够了吧?是时候分了吧?就让他们真的彼此断除联系?
  • 神秘的亚特兰蒂斯

    神秘的亚特兰蒂斯

    最强大的文明在愤怒的大自然面前也只有低下高昂。最为繁华的世界在一夜之间消失在茫茫大海之中。且看亚特兰蒂斯王子穿越后的惊世之旅。
  • 第二星

    第二星

    二零一五年,人类探查到了第二课地球,但在两颗地球之间,连接着一个巨大的黑洞,人们无法通过黑洞到达第二颗地球。二十年之后,科学家们研制出了可以穿越黑洞的战舰,二零五零年,人类开始运用更多的战舰来向第二地球进发。因为害怕第二地球出现当地生物,人类最高领导们在一起商讨了如何移居的事情。于是就有了主战派系和主和派系。经过商讨之后,主和派系将派出二十五人,前往第二地球,如果真的有当地人,希望能够进行沟通,让两个地球的人民共同生活。当二十五人组成的团队,开着战舰出发的那一刻,故事便开始了……