delphi程序设计课件

Delphi7的主菜单包括11个下拉菜单 注意：工具栏上的按钮都提供了描述该按 钮功能的tooltip，除了组件面板IDE有6个独 立的工具栏 IDE工具栏的定制功能并不仅限于配置需 要显示的按钮，还可以调整工具栏、组件面 板和菜单栏在主窗口中的位置。
Delphi7组件板包含了350多个组件，是 Delphi可视化编程的核心部件，它由27个选 项卡组成 组件面板如图1-4所示
如下用程序示例的项目文件：
program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.
（6）在Delphi集成开发环境中，通过【Help】 |【Customize】命令可以打开【Open Help】 窗口，在该窗口中可以对帮助文件进行管理， 其中包括帮助内容、帮助索引、链接位置和 帮助工程文件等的管理。
1.3 简单Delphi程序设计
Delphi 7编写应用程序包括新建应用程序、 设置窗体属性、添加组件、设置组件属性、 添加事件、编写事件响应代码、编译运行等 1.新建应用程序
3.对象观察器 利用对象观察器，可以修改窗体或组件的 属性，或者使它们能够响应不同的事件 。 属性(Property)是一些数据，如高度、颜色、 字体等，它们决定了组件在屏幕上的外观。 事件(Event)则是一种消息处理机制，它能够 捕捉某种情况的发生并做出反应，像鼠标单 击和窗口打开就是两种典型的事件。 对象观察器类包括Properties选项卡和 Events选项卡
type TForm1 = class(TForm) private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} end.
从上述源代码清单中可以看出，窗体对象 是从TForm继承下来的。 下面这一行非常重要： {$R*.dfm} Pascal语言中的$R指令用于加载一个外部 资源文件。*.dfm文件中包含在窗体设计器中 创建的表单的二进制代码。其中的“*” 表示 与当前单元文件同名的文件。 项目文件的扩展名是.dpr 可以选择主菜单下的【Project】|【View Source】命令把项目源文件调入代码编辑器。
1.2.4 帮助的使用
（1）当遇到问题时，可以尝试按下【F1】键， 一般情况下Delphi都会准确地定位。 （2）如果需要浏览系统的一些帮助内容，比 如说对象Pascal语言，可以通过菜单【Help】 |【Delphi Help】 命 令 打 开 【 帮 助 主 题 ： Delphi Help】对话框，在目录标签中展开相 关条目，进行系统学习。 3）当使用Windows API函数时，通过【Help】 |【Delphi Help】打开的【帮助主题：Delphi Help】对话框中，在【索引】选项卡中可能 查不到有关的帮助信息，有两种解决办法：
当添加表单和单元时将出现在uses子句中
1.2.2 基于组件的编程思想
Ⅰ.早期DOS操作系统和C语言主导的时代， “数据结构+算法”成为构建软件惟一方式 Ⅱ.C++语言和面向对象技术 Ⅲ. 20世纪90年代中期流行一种崭新的程 序设计概念 :软件可以由可互换的组件构成 组件是一种通过公开的属性、方法、事 件，是可以重复使用的一种经过编译的二进制 文件，其文件名可以是.OCX或者是.dll，如命 令按钮、复选框、单选框、滚动条等都是常见 的组件。
4.设置组件属性 选中组件，单击Object Inspector的标题栏以 激活对象观察器，并选择Properties选项卡。 在对象观察器中单击要设置的属性，进行属 性设置。 5.添加事件 选中要添加事件的组件，激活对象观察器， 并选择Event选项卡，在对象观察器中单击要 添加的事件，在其右侧输入事件的响应函数 名称，然后回车即可。 6.编写事件响应代码
1.2.3 Delphi 7的特点
Delphi最显著的特点就是高效性和稳定性， 主要体现在以下4个方面： ●可视化开发环境的性能。 ●编译器的速度和已编译代码的效率。 ●编程语言的功能及其复杂性。 ●丰富的VCL 1.可视化开发环境 可视化开发环境通常可分为3个部分：编辑 器、调试窗口和窗体设计器。
2.编译器的速度和已编译代码的效率 Pascal编译器最著名特点就是速度快，而 Delphi正是建立在这种编译器基础之上的。 增加了链接和各种缓存策略，尤其是在 Visual C++和C++ Builder中。 3.编程语言的功能及其复杂性 汇编是一种最有力的语言，即便是用汇编 开发最简单的应用程序，难度也非常大，还 可能一无所获。 4.丰富的VCL VCL(visual component libary)是Delphi7最 重要的组成部分，包含不同种类的组件 。
1.1 Delphi简介
Delphi作为一种可视化的编程环境，经 历了7代产品的发展历程: ◆ Borland公司在1995年推出了基于 Windows平台的Delphi 1。 ◆ Delphi 2新增加的主要功能是对32位编 程的支持。还增加了如数据模块等多种高 效的数据重用功能。
◆Delphi 3对其组件库进行增强 ,完全支持 ActiveX组件及其创建 。 ◆Delphi 4提供了Object Pascal语言的扩展 ,但 系统稳定性较差 。 ◆1999年推出Delphi 5增强了数据库的功能 ◆2001年6月推出Delphi 6 ，增加了大量的新 组件，使组件数目达350多个，以满足网络开 发的需要。 ◆2002年8月推出 Delphi 7 ，在集成开发环境 IDE、Web、数据库、编译器、模型生成支 持及组件库等很多方面进行了改进
的个数
begin stringlength:=edit1.GetTextLen; //得到编辑框1中字符个数 edit2.Text:=inttostr(stringlength); //编辑框2显示编辑框1中
一种办法是在代码编辑器中输入Windows API函数的名称，然后将光标定位到该名称中， 接着按下【F1】键。 另一种办法是通过【Help】|【Windows SDK】打开帮助文件Win32.hlp，在【索引】 选项卡中查找。 （4）帮助文件打开时，要浏览相关内容，可以 按下工具栏中的【>>】或【<<】按钮，通常 这样是在同一个主题中浏览。通过一些See Also热链接，也可以查看相关的帮助内容。 （5）在组件栏上右击，通过快捷菜单的Help命 令，可以查看有关组件的帮助内容。
1.启动程序 2.添加组件 在窗体设计器中添加如图1-7所示的各组件。
3.设置组件属性 4.编写代码 组件属性设置完成后，编写如下代码：
图1-7 窗体布局图
procedure TForm1.Edit1Change(Sender: TObject); //编辑 框1中的内容改变时的事件 var stringlength:integer; //定义整型变量，记录编辑框1中字符
启动Delphi 7，选择【File】|【New】| 【Application】菜单，新建一个应用程序。 2.设置窗体属性 单击【Object Inspector】，在对象观察器中 打开【Properties】选项卡，单击Caption属 性右侧，输入窗体的新标题“窗口”。 3.向窗体中添加组件 单击Standard选项卡上的Button组件，将鼠 标指向窗体中的任意位置（标题栏除外）， 单击鼠标，即可把Button1组件放入窗体中。 或者直接双击组件面板上的Button组件，也 可以在窗体中添加一个Button1组件。
下图两个对象观察器，左边一个按种类排序， 右边一个按名字排序。
图1-5 按种类或名称查看Object Inspector
注意：帮助系统是和对象观察器紧密结合在一 起的，想了解某个属性或事件的帮助信息， 只要在该属性或事件上按下F1 键
4.代码编辑器 代码编辑器是输入代码来指定应用程序行 为的地方，也是Delphi根据应用程序中的组 件自动生成代码的地方。当向应用程序中加 入一个窗体时，Delphi会自动创建一个新的 单元，并添加到代码编辑器顶部的标签中。 5.代码浏览器 以一种树状视图方式显示列在代码编辑器 中的单元文件。通过它，可以方便地在单元 文件中漫游或在单元文件中加入新的元素或 者把已有的文件改名。要记住代码浏览器和 代码编辑器有一对一的关系。
1.2 Delphi7 IDE
1.2.1 认识集成开发环境
Delphi 7的IDE主要包括7个部分：主窗口、 组件面板、工具栏、窗体设计器、代码编辑 器、对象观察器和代码浏览器。
图 1-1 Delphi 7 的 IDE
1.主窗口 主要包括：菜单栏、工具栏、标题栏和组件 面板
图1-2 Delphi 7的主窗图口
6.源代码生成器 当对窗体设计器中可视化组件进行操作时 Delphi IDE自动生成Object Pascal源代码。 当用【File】|【New】|【Application】菜单 命令创建一个新的项目时，将看到屏幕上出 现一个空白的窗体设计器，同时，代码编辑 器中会自动出现一些代码，如下所示：
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs;
选定要编写事件响应代码的组件 ，打开Event 选项卡，双击要编写响应代码的事件右侧的 空白部分，进入代码编辑窗口。
procedure TForm1.Button1Click(Sender: TObject); //单击放大按钮，窗口将放大 begin form1.Height:=form1.Height+10; //窗口高度10 form1.Width:=form1.Width+10; //窗口宽度10 end; procedure TForm1.Button2Click(Sender: TObject); //单击缩小按钮，窗口将缩小 Begin form1.Height:=form1.Height-10; //窗口高度减10