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