Delphi7基础语法教程
Delphi7__常用组件的使用
（2）TMemo组件的常用方法
Add方法：该方法用来向字符串列表的尾部添 加一个字符串。其语法格式如下： function Add(const S: string): Integer; virtual;
Clear方法：该方法用来清空字符串列表。其语 法格式如下： procedure Clear; virtual; abstract; Delete方法：该方法用来从字符串列表中删除一 个指定的字符串。其语法格式如下： procedure Delete(Index: Integer); virtual; abstract; Insert方法：该方法用来向字符串列表中插入一 个字符串。其语法格式如下： procedure Insert(Index: Integer; const S: string); virtual; abstract;
CharCase属性：该属性用来控制编辑框中文本的大 小写 。 AutoSelect属性：该属性用来决定当编辑框获得焦 点时，是否自动选定显示的文本。 BorderStyle属性：该属性用来决定编辑框组件是 否有边框 。 CanUndo属性：该属性用来指出对编辑框中显示的 内容改变是否能够撤消。 HideSelection属性：该属性用来决定当编辑框失 去焦点时，选中的文本是否还是以选中的方式提供视 觉提示。 MaxLength属性：该属性用来决定编辑框中最多能 够输入或显示的字符个数。
（2）TListBox组件的常用方法
Clear方法：该方法的作用是清除列表框中的所有列 表项，该方法无参数。 ClearSelection方法：该方法的作用是清除列表框中所 有被选中的选项。 SelectAll方法：该方法用来选中列表框中的所有文本。 MoveSelection方法：该方法用来把列表框中的所有 选中的列表项移动到另一个列表框中。 CopySelection方法：该方法用来把列表框中的所有选 中的列表项复制到另一个列表框中。
第2章Delphi语法基础
第2章Delphi语法基础第2章Object Pascal语言基础Delphi的编程语言是Object Pascal，即面向对象的Pascal语言。
自Delphi 7 开始，Object Pascal语言改称为Delphi 语言。
第1节保留字和标识符一、保留字保留字是由系统使用的具有特殊含义的单词（如And、If、For、Var等），详见教材16～17页表2.1。
二、指令符指令符也是由系统使用的具有特殊含义的单词（如Public、Private等），详见教材17页表2.2。
三、标识符标识符（Identifiers）用于表示常量、变量、域（字段）、类型、属性、过程、函数、程序、单元、库和包（packages）的名称。
Object Pascal标识符的声明和使用应遵循以下规定：长度任意，但仅前255个字符有效。
首字符必须是字母或下划线。
不能含有空格，中间的字符可以是字母、数字和下划线。
不能使用保留字（reserved words）作为标识符。
不区分大小写，例如sName与sname等价。
第2节注释三种注释形式：{注释内容}（*注释内容*）//注释内容注意：如果注释符{之后紧跟一个美元符号$（如{$R *.res}），表示该语句是一条编译指令，它与普通的注释不同，通常由Delphi自动生成，用于设置编译过程，不要修改或删除它。
第3节常量和变量一、常量1. 普通常量如：123，-100，3.14，'abc'，True等。
2. 符号常量符号常量用保留字Const声明，格式如下：Const常量名 = 表达式；例如：ConstPI = 3.1415926535897932385;College = '山东教育学院'；Numeric = ['0'..'9']; // 数字字符集合Alpha = ['A'..'Z', 'a'..'z']; // 英语字母集合AlphaNum = Alpha + Numeric; // 集合的并2. 变量变量声明的格式：var变量名表：类型；例如：varX, Y, Z: Double;I, J, K: Integer;S1, S2: String;Digit: 0..9; // 子界类型Flag: Boolean;单元级或全局变量可以在声明时初始化（每个声明语句仅限一个变量）。
Delphi7.0的常用函数与过程
Delphi7.0的常用函数与过程2.1.4 Delphi 7中的运算符与表达式Delphi 7 有8 类运算符，本章主要学习算术运算符、字符串运算符和位运算符。
其他运算符将在以后的章节中学习。
1．算术运算符算术运算符是用户最熟悉的，类似算术中的加减乘除等。
Delphi 7中有8个算术运算符，具体含义如下。
（1）取正运算符“+”：单目运算符，表示对一个数值型数据取正，例如+5的值为5。
另外，取正运算符可以省略。
（2）取负运算符“-”：也是单目运算符。
例如对5取负，其值为-5。
（3）加法运算符“+”：与数学上的加法相同。
加法运算符与取正运算符符号相同，但含义不同。
例如3+5的值为8。
（4）减法运算符“-”：与数学上的减法含义相同。
也请注意减法运算符与取负运算符的异同。
（5）乘法运算符“*”：表示对两个数值型数据相乘，与数学中的乘法相同。
例如：3*5 的值为15。
（6）除法运算符“/”：与数学上的除法含义相同。
例如3/5 的值为“0.6”。
另外，除法运算的结果总是实型数据。
（7）整除运算符“div”：只能对两个整数进行除法运算，结果为整型数据。
例如5 div 3 的值为1，而“5 div 2.0”是不合法的。
（8）取余运算符“mod”：对两个整数相除，结果为余数。
例如5 mod 3的值为2。
1，数学类函数包括绝对值函数，取整数函数，取小数函数，平方函数，平方根函数，三角函数，指数函数，对数函数和随机函数等。
（1）绝对值函数：Abs(x) 返回x的绝对值，x是整型或实型数据例：x := Abs(-1); //这是一个赋值语句，先计算赋值号右边函数的值（为1）再赋给x.(2)取整数函数例：(3)取小数函数返回x的小数部分，x为实型数据例：(4)平方函数返回实型数据x的平方值,x为实型数据(5)平方根函数返回非负实数x的算术平方根，x为非负实数，返回值也为非负实数例：(6)三角函数返回以弧度为单位的x的正弦函数值，x的单位为弧度返回以弧度为单位的x的余弦函数值，x的单位为弧度ArcTan(x):Extended;返回x的反正切函数值，x的单位为弧度例：（7）指数函数返回值为e x,参数x为实型数据例：（8）自然对数函数Ln(x) := Real;返回x的自然对数值，参数x为正实数，其它对数函数可以由换底公式导出。
Delphi7的简介与实例教程文件
1.2 Delphi可视化开发环境简介
1. Delphi 7 IDE 运
单中选择“程序”\Borland Delphi 7\Delphi 7选项，就进入了 Delphi 7
IDE 运行界面，如图所示会出现5个主窗口： 标题为“Delphi7-Project1”的Delphi的主窗口。 Delph件i的板主。窗口位于屏幕的上端，包括主菜单、工具样和组 对象Tree View (object Tree View). 对象观察器（Object Inspector）. 标题为“From1”的窗体设计器。 标题为“Unit1.Pas”的代码编辑器，刚启动时这一窗口的大部
Delphi 拥有一个可视化的集成开发环境 (IDE），采用面向对象的程序语言Object Pascal 和基于部件的开发结构框架。Delphi它提供了500 多个可供使用的构件，利用这些部件，开发人员 可以快速地构造出应用系统。开发人员也可以根 据自己的需要修改部件或用Delphi本身编写的部 件
第二章 Delphi的语言基础
2.1 数据类型
1.布尔型数据 布尔类型的标识符为Boolean。布尔型变量的取值仅有False 和True两个值。 2整型数据
整型是存取整数数据的类型，是整数的一个子集。整型 有通用整型和基本整型之分 。 3.字符型数据
字符型的数据只能是单个字符，不能是一串字符。 4.实数类型 实数类型定义了一类可以用浮点数表示的数字。
对于在程序运行期间保持不变的数据，Delphi允许通过声明 常量来调用。声明常量不必指定数据类型，但需指定常量 所代表的数据的值。 常量的声明格式如下：
Const 常量名=表达式
2.2 Delphi Object Pascal的概述
2.2.3 运算符 1.赋值运算符（:=）
Delphi 7教程9
9.1.1 画布对象属性(７) 画布对象属性(
B. 画第二个方形 在没有图像交叉的部分与画第一个方形没什么两样，背景画图处 还是灰色的RGB(191,191,191)，所以画出来的还是淡黑色的。 第二次按按钮 根据前面讲的外面黑色的部分被反成灰色，而中间的灰色被求了两次反 还是灰色。如图9-5所示。 简单地举以上几个例子，其他的属性值自己去尝试一下，你可以看到许 多意想不到的效果。 （4）宽度属性（Width） 表示画笔的粗细程度，单位是像素，默认值为1，表示为一个像素。设置方 式为： canvas.Pen.Width:=<整型>； 例如：canvas.Pen.Width:=5；就设置了画笔的宽度为5个像素。 3. 画刷（Brush） 画刷（ ） 画刷（Brush）属性是用来设置图形内部区域的填充方式。 （1）颜色（Color）属性 颜色属性是来设置画刷的填充区域的颜色，默认情况下是白色。
9.1.1 画布对象属性(2) 画布对象属性(2)
procedure TForm1.Button1Click(Sender: TObject); VAR xt,yt,t:integer; //xt,yt是用来决定像素的位置，t用来控制循环次数。 x,y:real; //x,y是用来取得屏幕的中心 begin x:=form1.ClientWidth/2; // ClientWidth属性指的是不包括标题栏在内的宽度。 y:=form1.ClientHeight/2; // ClientHeight属性指的是不包括标题栏在内的高度。 for t:=-10000 to 10000 do begin xt:=round(t/100+x); {t之所以要除以100是因为要让像素的显示紧密点没有断断续续的感觉，加上x是 因为原来的中 心在（0，0）的地方，也就是画布的左上角，而现在是要移到（x,y）的地方， 将坐标原点进行了 移动。} yt:=round(-t/100+y); canvas.Pixels[xt,yt]:=clblue;//画布的像素颜色为蓝色。 end; end;
Delphi的语法基础
1.窗体中添加的组件 设置窗体和组件属性，如表2-10所示。
下一页 返回
项目2求整数各位数字
2.窗体中的事件 四个按钮的单击事件。对于一个4位整数，要知晓如何求其各
位数字。例如，对于1 234这样一个整数，将它整除1 000就得到千 位上的数值1；将1 234对1 000取余得到234，再整除100即是百位 上的数字2；将1 234对100求余得到34，再对34整除10就得到十位 上的数字3；1 234对10取余即得到个位上的数字4。
函数值、余弦函数值、反正切函数值，x的单位为弧度。
上一页 下一页 返回
项目3简单的函数计算器
指数函数Exp（x）：返回值为e为实型数据。 自然对数函数Ln（x）：返回x的自然对数值，x为正实数。 随机数函数Random（x）：返回一个大于等于0小于x的随机整数，x
为整数；若x默认，返回值为大于等于0小于1的实数。 2.字符串处理函数 (1)大小写转换函数：
(8)插入子字符串过程“Insert(S1:String;var s:String;k:Integer);”： 将字符串S1插入到字符串s中的第k个字符处。
3.数值和字符串相互转换函数（见表2-16）
上一页 返回
项目4改变文本格式
项目说明
设计一个程序，程序设计界面如图2-10所示。在程序设计时， 编辑框显示“Hello，Delphi！”文字，字号为12号，字体为宋体， 字体颜色为蓝色。程序运行时，单击“改变”按钮，编辑框文本 内容不变，但字号改为15号，字体变为黑体，颜色变为绿色，如 图2-11所示。
下一页 返回
项目3简单的函数计算器
项目实现 学习支持
1.常用数值运算函数 绝对值函数Abs（x）：返回x的绝对值,参数x是整型或实型数据。 取整数函数Int（x）：返回x的整数部分，x为实型数据。 取小数函数Frac（x）：返回x的小数部分，x为实型数据。 平方函数Sqr（x）：返回x的平方值，x为实型数据。 平方根函数Sqrt（x）：返回x的算术平方根，x为非负实数。 三角函数Sin（x）、Cos（x）、ArcTan（x）：分别表示返回x的正弦
第1章 Delphi 7快速入门
（2）在列表中选择“Borland Delphi6(7)”选项，如图1-9 所示，单击“Next”按钮。
（3）打开卸载模式选择窗口，如图1-10所示。 （ 4 ） 单 击 “ Next” 按 钮 ， 随 后 出 现 确 认 窗 口 ， 单 击 “Remove”按钮，出现程序卸载进度条。
（5）完成后，出现完成画面，如图1-11所示。单击 “Finish”按钮，程序卸载完成。
Save
Save All
Remove files from project Add files to project
New Form
View工具栏
View Unit
View Form
Toggle Form/unit
Debug工具栏
Run Pause
Trace Into
Step Over
Custom 工具栏 Help Content 定制工具栏
RAM 32M 64M
1.2.2 Delphi 7安装
Delphi 6(7)采用智能化安装方式，具体步骤如下： （1）把Delphi6(7)的安装光盘放入光驱中，系统会自动运行安装程 序，显示安装画面，如图1-1所示。 （2）用鼠标单击“Delphi”选项，出现安装向导进度条后，进入欢 迎窗口，如图1-2所示。 （3）单击“Next”按钮，随后进入Password Dialog窗口，输入系列 码、授权码，然后单击“Next”按钮。 （4）打开安装软件认证协议窗口，单击“Yes”按钮。 （5）进入消息Information窗口，单击“Next”按钮。 （6）指定Delphi6(7)安装方式，Delphi6(7)提供了三种选择：典型安 装、精简安装、自定义安装（如图1-3所示）。
Delphi 7教程8
?多媒体介绍第第88章章多媒体应用编程多媒体应用编程?tanimate组件的属性事件和方法介绍?tmediaplay组件的属性事件和方法介绍?综合实例8181多媒体介绍多媒体介绍随着多媒体技术的不断发展多媒体的使用范围越来越广泛
第8章 多媒体应用编程
本章要点： 本章要点：
多媒体介绍 TAnimate 组件的属性、事件和方法介绍 组件的属性、 TMediaplay 组件的属性、事件和方法介绍 组件的属性、 综合实例
8.1.1 多媒体定义
人类在信息交流中要使用各种媒体。媒体有两种含义：存储信息的 物理实体，如磁带、磁盘、光盘、打印纸等；信息的表现形式(表示)和 传播的载体，如文字、声音、图形和图像等。计算机媒体是指后者， 也就是说媒体是指信息表示和传播的载体。在计算机中使用五种媒体： 感觉媒体、表示媒体、表现媒体、存储媒体、传输媒体。
delphi7经典教程
delphi7经典教程软件程序编制规范3.2、软件程序编制规范3.2.1、编制程序：根据系统分析要求编制程序，要求实现代码的复用、算法的优化、程序代码的优化、发现数据库设计不合理的及时反馈,减少循环嵌套，基础数据避免重复更新，保证进入的数据就是齐全的、正确的。
3.2.2、程序自测：负责按测试方案进行自测，交付测试的程序不能出现不能正常运行、未按公式计算的简单错误。
3.2.3、程序测试：将完成的程序转系统分析人员按测试方案测试。
3.2.4、开发工具的程序编制规范：详见详细规范。
3.2.5、.net编程规范一．安装方法：1、安装IIS与frontpage扩展：点击控制面板，点击添加删除程序，选择添加删除WINDOWS组件，选择应用程序服务器。
点击详细信息，选择internet信息服务IIS，点击详细信息，选择frontpage 2002 server extensions与internet 信息服务管理器，按向导提示点击下一步，然后放入系统盘。
2、要在防火墙退出的环境下进行安装，把网线拔掉。
3、放入第一张光盘，他会提示安装.net必备,放入第三张光盘，根据向导提示安装。
安装完第一张、第二张就可以运行.net了.第四、五、六张为MSDN帮助文件。
(07.02.06添加)3.2.6、Delphi7.0编程规范第一部分：软件安装与控件安装方法一、软件安装：光盘或网络安装后,将光盘CRACK目录下dent.slip拷贝到安装路径下。
未注册信息将不再显示。
二、基本安装：1、对于单个控件，Componet-->install component..-->PAS或DCU文件-->install；2、对于带*.dpk文件的控件包，File-->Open(下拉列表框中选*.dpk)-->install即可；3、对于带*.bpl文件的控件包，Install Packages-->Add-->bpl 文件名即可；4、如果以上Install按钮为失效的话，试试Compile按钮；5、是run time lib则在option下的packages下的runtimepackes加之。
Delphi 7教程7
7.2.2 编辑框组件(4)
7.3 列表框组件和组合框组件
在Windows应用程序中，除了一些无规律数据的输入外，大量地使用了 特定数据的录入和编辑。对于这些有规律的数据，就可使用列表框和组合框 组件。列表框和组合框组件对于减少用户输入，增加程序的易用性方面都有 极大的帮助。接下来介绍这两个组件的比较重要和常用的属性、事件和方法。
使用Picture Editor分别为sb1~sb3按钮的Glyph属性设置一个对应的位图文 件，这些位图文件分别在delphi 7.0\Domos\Doc\Graphex 目录下，当然，可 以自己选择合适的位图文件。 在B1按钮的OnClick事件中添加如下代码，注意i变量在implementation之前 应该先给予定义：var i:integer=0;
7.1.2 按钮类组件(4)
在B1按钮的OnClick事件中添加如下代码，注意i变量在implementation 之前应该先给予定义： sb2.down:=true; var i:integer=0; i:=2; procedure TForm1.B1Click(Sender: end TObject); else if i=2 then begin begin if i=0 then sb3.Down:=true; begin i:=0; sb1.Down:=true; end i:=1; end; end
7.2.2 编辑框组件
1. Edit组件 位于组件面板的Standard标签页，用户可以在其中输入单行文字 或数据，同时可能用于显示信息，下面介绍它的常用属性及主要的事 件和方法。
7.2.2 编辑框组件(1)
AutoSelect 属性、CharCase 属性、MaxLength属性、Passwordchar属性、 Text属性 Clear方法、CopyToClipboard 方法、CutToClipboard 方法 PasteFromClipboard 方法、OnChange 事件、当编辑框中的内容发生改变 时，将触发这个事件。 2. Memo 组件 Memo组件位于组件面板Standard标签页， Memo组件中的 属性和Edit组件存在着许多相似之处。不同的是，Memo组件中 可以显示和编辑多行文本，下面介绍它的常用属性及事件和方法。 Lines属性、Maxlength属性、ScrollBar 属性、WantReturns属性、 WantTabs属性、Clear方法、Add方法、SelectAll 方法、 ClearSelection方法
第5章 Delphi 7基础知识及Delphi 7与数据库
2、窗体设计器 窗体（Forms）窗口是开展大部分设计的工作区域。 3、对象查看器 对象查看器窗口含有两页：Properties页显示窗体中当前被 选择部件的属性信息，并允许改变对象的属性；Events页列 出了当前部件可以响应的事件。 4、代码编辑器 代码编辑器是输入代码的地方。代码窗口一开始处于窗体窗 口之下。因为在Delphi中，设计用户界面直接在窗体中进行， 运行结果和设计样板完全一致。当部件被放到窗体上时，De lphi会自动生成大部分的用户界面代码。 5、对象树状列表（对象监视器） 代码浏览器以一种树状视图的方式显示了列在代码编辑器中 的单元文件。
Edit1.Color:=clRed;
2、顺序结构 顺序结构是程序设计中最简单、最常用的结构。 在该结构中，各程序段按照出现的先后顺序依次 执行，不产生程序流程的其他转移。它是所有程 序的主体结构，即使在选择结构或循环结构中， 也常以顺序结构作为其子结构。
【例5.1】 求一个任意三角形的面积。
(1)界面设计 使用Button、Edit、Label组件和showmessage消息 框即可完成界面设计，用户界面如图所示。
2005 10.0 发布名称:Borland Developer Studio(BDS) 2006。集成C++ Builder; ECO(Enterprise Core Objects)升级到ECO III; 集成Together for Delphi，可以在同一个IDE中进行UML开发；QA Audits和QA Metrics可 以快速的把握专案的设计和代码的质量。 2006 Turbo Borland将BDS 2006拆分成几个独立的版本(Delphi for win32、 Delphi for .net、C#、C++ Builder)，而且不能同时安装两个不同的版本。 由于Borland的IDE生产部份独立成为一家名为CodeGear的公司，所以 这个版本是以Borland名义推出的最后一个版本。 2007 11.0 正式名称：CodeGear RAD Studio - Delphi 2007。 2008 5.7 Borland正式宣布将CodeGear子公司出售给Embarcadero(易博 龙)技术公司。 2008 8.25 Embarcadero发布CodeGear Delphi 2009 Pre-release版。 2009 8.25 Embarcadero发布CodeGear.RAD.Studio.2010版 2010.8.30 Embarcadero 发布 Delphi XE（又名Delphi 2011，代号为Fulcr um） 2011.1.27 Embarcadero公司宣布成立一个新的精简版Delphi Starter Editi on，是在爱好者和谁得到一个稍微简化的功能集为一个小的创业公司的 价格，旨在可用性。
delphi7教程总结
delphi7教程总结Delphi7.0编程规范第一部分:软件安装与控件安装方法一、软件安装:光盘或网络安装后,将光盘CRACK目录下dent.slip拷贝到安装路径下。
未注册信息将不再显示。
二、基本安装:1、对于单个控件，Componet-->install component..-->PAS或DCU文件-->install; 2、对于带*.dpk文件的控件包，File-->Open(下拉列表框中选*.dpk)-->install即可; 3、对于带*.bpl文件的控件包，Install Packages-->Add-->bpl 文件名即可; 4、如果以上Install按钮为失效的话，试试Compile按钮;5、是run time lib则在option下的packages下的runtimepackes加之。
如果编译时提示文件找不到的话，一般是控件的安装目录不在Delphi的Lib目录中，有两种方法可以解决: 1、反安装的源文件拷入到Delphi的Lib目录下;2、或者Tools-->Environment Options中把控件源代码路径加入到Delphi的Lib目录中即可。
注意:所安装的控件是否与你所用的Delphi版本相适应。
三、控件删除:在Component/Install Packages中删除。
选Component/configure Palette…有pages和components两个区域双击components区域，选中要删除得控件，下面有得Delete按钮但系统提供的控件只能Hide，不能delete。
打开控件所在的包文件(*.dpk)，从中删除控件那个文件，再重新编译该包即可如果是整个控件包都要删除的话,project->Option->Packages,删掉那个packages 四、详细控件安装1、 Ehlib控件运行Ehlib.v3.4.for.Delphi5678\Ehlib v3.4\Delphi7\DclEhLib70.dpk文件，在弹出窗口中点击Conpile，再点击install，提示安装成功后在Delphi—Tools—Environment Options—Library—Library Path中添加路径Ehlib.v3.4.for.Delphi5678\Ehlib v3.4\Delphi7\2、 Fastreport 控件分别运行fastreport 2.53\source\fr7.dpk，fastreport 2.53\source\ado\ FRADO7.dpk，fastreport 2.53\source\BDE\FRBDE7.dpk，fastreport 2.53\source\DBX\FRDBX7.dpk fastreport2.53\QueryBuilder\Source\dclOQB70.dpk fastreport2.53\QueryBuilder\Source\ADO\dclOQBADO70.dpkfastreport 2.53\QueryBuilder\Source\BDE\dclOQBBDE70.dpkfastreport 2.53\QueryBuilder\Source\DBX\dclOQBDBX70.dpk，fastreport 2.53\QueryBuilder\Source\IBX\dclOQBIBX70.dpk文件，在弹出窗口中点击Conpile，再点击install;安装完毕后，在Delphi—Tools—Environment Options—Library—Library Path中添加路径: fastreport 2.53\sourcefastreport 2.53\source\adofastreport 2.53\source\bdefastreport 2.53\source\dbxfastreport 2.53\source\ibx第 1 页共 22 页fastreport 2.53\QueryBuilder\Sourcefastreport 2.53\QueryBuilder\Source\ado fastreport2.53\QueryBuilder\Source\bde fastreport 2.53\QueryBuilder\Source\dbx fastreport 2.53\QueryBuilder\Source\ibx 3、Raize控件分别运行Raize\RC3\Source\Rz30Ctls_Dsgn70.dpk，Raize\RC3\Source\Rz30DBCtls_Dsgn70.dpk，在弹出窗口中点击Compile，再点击install;安装完毕后，在Delphi—Tools—Environment Options—Library—Library Path中添加路径:Raize\RC3\Source4、VirtualTreeview控件VirtualTreeview4.0.12\VirtualTreeview\Packages\VirtualTreesD7D.dpk文件，在弹出窗口中点击Compile，再点击install;安装完毕后，在Delphi—Tools—Environment Options—Library—Library Path中添加路径:VirtualTreeview4.0.12\VirtualTreeview\Packages 5、xlreport控件分别运行xlreport\xlr4pro123.exe和xlreport\xlr4dfull123.exe，注意安装过程中只保留delphi7和demo两个选项即可，安装完毕后将安装路径下的AfalinaSoft\XL Report 4\Source文件夹的所有文件拷到AfalinaSoft\XL Report 4\d7units中，运行d7XLR4_D.dpk文件;同样将AfalinaSoft\ProOptionPack\Source内的所有文件拷到AfalinaSoft\ProOptionPack\d7units中，运行d7OPack.dpk文件五、第三方控件的下载与安装:用到的第三方控件在了解其用途后，经主任审批后，方可进行安装。
--第9章 Delphi7入门_stu
••••••
••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• •• ••••• ••••• ••••• ••••• •••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• •••••
••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• •• ••••• ••••• ••••• ••••• •••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• ••••• •••••
Delphi7基础语法教程
第1章 Delphi 基础知识1.1 为什么选择DelphiDelphi是美国Borland公司推出的一种基于客户/服务器体系的Windows快速应用开发工具（RAD Rapid Application Development），是一种面向对象的可视化编程工具，即根据Delphi 的可视性，又结合Object Pascal 语言的编程技巧，可以开发出功能强大的Windows应用程序和数据库应用程序。
Delphi是第一个集可视化开发环境、优化的源代码编译器和可扩展的数据库访问引擎于一身的Windows开发工具。
它具有以下优点：1.优秀的可视化开发环境2.高效率的编译器3.结构良好的编程语言4.对数据库和网络编程的灵活支持5.层次清晰和可扩展的框架1.2 Delphi 发展史Delphi发展至今，从Delphi1、Delphi2到现在的Delphi xe，不断添加和改进各种特性，功能越来越强大。
Delphi 1.01995年一个开发工具中的超级明星在Borland诞生了，这就是Delphi 1.0。
在Delphi1.0中Borland放弃了OWL（Object Window Library），取而带之的是全新的Visual Component Library，从此开始了组件(Component)技术的时代，其意义深远；Delphi1.0是完全面向对象的。
它是Delphi 的最早版本。
Delphi 2.01996年Delphi2.0完成了16位到32位的跨越，提供了32位操作系统的完整支持，只能在Windows 95以上的操作系统中使用，它如同Delphi 1.0一样大获成功。
在Delphi2.0中Borland为它增加了可视的Form的继承，并且面向对象更彻底。
由于所有函数支持"虚函数"特性，对程序编写和维护非常方便，大量类似的报表也采用了此技术。
Delphi 2.0中，增加了Data Modules的概念，可以将数据包装在一个模块中，在系统启动时或空闲时将它打开，这样，所有使用这些T able的模块都可以公用它，避免重复打开和关闭。
《Delphi程序设计基础教程》 第1章 Delphi7集成开发环境
1.2 Delphi软件的安装及卸载
图1-10 设置安装路径
DELPHI程序设计基础教程
2020年1月9日星期四
1.2 Delphi软件的安装及卸载
选择完安装路径后，单击【next】按钮， 安装向导询问用户是否安装数据库保存到 本地硬盘，如图1-11所示。
DELPHI程序设计基础教程
2020年1月9日星期四
1.2 Delphi软件的安装及卸载
单击【Install】按钮，开始正式安装，如图1-13所 示。
图1-13 正式安装
DELPHI程序设计基础教程
2020年1月9日星期四
1.2 Delphi软件的安装及卸载
系统安装完毕后，用户可单击【Finish】按钮即可 ，如图1-14所示。
图1-14 系统安装完毕
DELPHI程序设计基础教程
2020年1月9日星期四
1.1 Delphi简介
Delphi7的新特点 Delphi7在继承了Delphi中能有效的帮助开发人员快速
的构造出所需的Windows应用程序等传统优势的同时，也进 行了进一步的完善和发展。
目前，Delphi7加强了集成开发环境、数据库、可视组 件库等方面功能。首先，为了顺应当今基于Web服务的电子 商务应用程序开发的潮流，Delphi7加强了使用商业XML的 Windows操作系统与Web Services兼容能力。其次，为了 更加便于程序员编程，Delphi7在集成开发环境中的组件面 板上新加入了一些组件并优化了代码编辑工作。再次， Delphi7使用Rave Reports（即目前可获得的第一个和唯一 的专业性可视化报表工具）技术，这大大加快了程序员创 建跨平台的报表的速度。另外，Delphi7增加了对Windows XP风格的支持。最后，Delphi7也为开发人员提供了更为可 靠的安全性的控制以及可伸缩性的开发需要。
Delphi7 基本数据类型与表达式
5．表达式
（1）算术表达式
算术表达式就是将算术运算符、圆括号和满足该运算符要求 的有关数据（数值型常量、变量和函数等）连接起来的式子。
（2）字符串表达式
利用字符串运算符将字符串常量、字符串变量或 字符串函数连接起来的式子称字符串表达式。字符串 表达式的格式如下： s1+s2 其中s1和s2可以是字符串常量、变量或函数。
描述存储各种整数数据的类型即整型。
2．实型 Real Double
描述存储各种实数数据的类型为实型。
3．字符型 Char
描述存储单个字符数据的类型。
4．字符串型 String 5．布尔型: True（真）和False（假）数据的类型。
2.1.2 Delphi 7.0中的标识符与保留字
1．标识符
[格式]：Const 常量名1:类型名1=常量值1; … 常量名n:类型名n=常量值n;
2．变量
（1）变量的声明
声明变量的语法格式如下: [格式]：Var
变量名1:类型名1;
变量名2:类型名2; … 变量名n:类型名n;
（2）变量的使用
2.1.4 Delphi 7.0中的运算符与表达式
1．算术运算符
2．保留字
3．指令符
2.1.3 Delphi 7.0中的常量与变量
1．常量
（1）直接常量
直接常量就是在程序中直接使用的各种常量，如 整型常量516、-111等；实型常量1.2、0.0、3.6E5等； 字符常量'a'、'10'等；字符串常量：'www'、'中国'等； 布尔常量True和False。
（1）取正运算符“+” （2）取负运算符“-” （3）加法运算符“+” （4）减法运算符“-” （5）乘法运算符“*” （6）除法运算符“/” （7）整除运算符“div” （8）取余运算符“mod” 注意： 取正运算符和取负运算符是单目运算符，其它 6个运算符为双目运算符。 加法运算符、减法运算符和乘法运算符的结果 的类型为参加运算的两个数据中的精度高的类型。 /、div和mod运算符中的除数不能为0。
Delphi7 过程与函数
图5-8 程序运行界面
5.1.5 子程序的嵌套与递归
1．子程序的嵌套
在Delphi中把过程与函数统称为子程序，子程序 既能嵌套定义也能嵌套调用。嵌套定义的含义是，在 一个子程序中的定义中又包含了另一个子程序的定义。 嵌套调用是指在调用某个子程序时，该子程序又调用 了其它的子程序。在嵌套定义时，被包含的子程序称 为内层子程序，包含其它子程序的子程序称为外层子 程序。紧邻的两层称为邻层，否则称为隔层。
图5-2 程序设计界面
图5-3 程序运行界面
5.1.3 函数的定义与调用
1．函数的定义
函数也是完成一定功能的程序段，与过程的主要 区别就是函数有返回值，其定义方式稍有不同，函数 的定义格式如下。 [格式]：Function 函数名（形参表）:返回值类型; 局部声明 begin 语句; end;
2．函数的调用
函数也是通过调用来运行的，调用函数的一般 格式如下。 [格式1]：变量名=函数名(实参列表); [格式2]：表达式 运算符 函数名(实参列表); 注意：函数有一个返回值，函数调用就相当于 一个同类型的值，可以和同类型的数据一样 作为表达式或表达式的一部分参加运算。
【例5-2】 定义一个函数，用来求任 意非负整数各位数字之和。程序设计界 面如图5-4所示，程序运行时，在第一个 编辑框中输入一个整数，然后按【计算】 按钮，将把该整数的各位数字和求出来 并显示在第二个编辑框中，如图5-5所示。 要求把求整数的各位数字和编写成一个 函数。
图5-13 程序设计界面
图5-14 程序运行界面
5.2.2 典型实例二：斐波那契（Fibonacci）数列 典型实例二：斐波那契（ ）
【实例题目】 斐波那契（Fibonacci）数列是一个典型的可用递 归求解的问题。该数列来源于兔子的繁殖，大意是： 小兔子和大兔子没有繁殖能力，只有老兔子才有繁殖 能力。假设第1个月有一对小兔子，第2个月长成大兔 1 2 子，第3个月长成老兔子，并生出一对小兔子；第4个 月，老兔子继续生出一对小兔子，同时原来的小兔子 长成大兔子，这样在第4个月就有一对老兔子，一对 大兔子和一对小兔子共3对兔子；依此类推，假设兔 子永远不死，请编写程序求出任意一个月有多少对兔 子。程序设计界面如图5-15所示，程序运行时输入月 数，然后单击【计算】按钮，将显示出该月的兔子对 数，如图5-16所示。
Delphi 7教程4
4.2.1 定义(1) 定义(1)
一维动态数组的声明中没有给出数组的下标类型，因此就可以声明一 个不指定元素个数的数组。在程序设计中，通过调用标准过程Setlength 来明确动态数组的大小。 var Myarray: array of real； //定义一个名为Myarray的动态数组 begin Myarray[1]:=1.52; //错误，没有明确数组大小前是不能对数 组赋值的 setlength(Myarray,30); //设置动态数组长度为30，下标从0到29 Myarray[2]:=4.56; //正确 end; 需要注意的是，Object Pascal 中的普通数组既能用不为零的下标，也能 用非整数的下标，但一维动态数组均不支持这两种下标。和普通数组一样， 可以通过Length()、High()和Low()函数了解到动态数组的状况，不过对于一 维动态数组，Low()函数返回值总是0，High()函数返回数组大小减1。 注意:动态数组总是从零开始的。在一个空的动态数组中，Low 函数返回 注意 值是0， High函数返回值是-1，比它Low的返回值还小。
4.1.2 应用(4) 应用(4)
2. 分析
首先，定义一个全局数组变量的目的是可以在程序的两个按钮事件中 都能被访问到。在产生随机数按钮中（即button1按钮）使用了一个for循 环，其中A[i]:=random(50)语句是将产生的随机数赋值给数组，50表示产 生的随机整数在0和50之间，并且将数组中各元素值通过label1标签进行 输出。在排序按钮中（即button2按钮）先是使用了双重for循环，目的是 对数组进行排序。其主要思想是将相邻的两个数A[1]，A[2]比较，如果前 者小于后者则交换，再将A[2]与A[3]进行比较并进行相同处理，直到将最 后两个数比较并处理完毕。这时最大的一个数已换到了最前一个位置， 这是第一轮的比较和处理。然后进行下一轮比较，把剩下的数中最大的 数移到最前的第二个位置。进行High(A)轮后就可将数组中的元素从大到 小的顺序排列了。第三个for循环是将重新排列的数组元素转换成字符串， 最后通过label2标签进行输出。 3. 运行结果 运行以上程序，结果如图4-2所示。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
其中，变量标识符列表中可以包含一个或多个变量标识符，若有多个变量标识符时，相邻的两个 变量标识符之间应使用逗号“,”隔开；类型标识符用以指定这些变量的数据类型。
变量说明以保留字 var 开头。一个变量说明部分可包含多个变量的说明，每个变量说明末尾均有 分号。一个变量在某一个时刻有且仅有一个值。 2. 变量的命名和格式
Delphi 3.0 1997 年：在微软 COM/DCOM 技术日益成熟的情况和企业对分布式应用程序开发工具的需求下， Borland 的开发人员巧妙的平衡了二者的关系，使 Delphi3.0 成为 Windows 平台的第一款提供分布式 开发的开发工具。
Delphi 4.0 1998 年：由于决策的错误，Delphi 4.0 是一个不成熟的产品，其中有大量的 bug，尽管 Borland 也不停的发补丁，但不稳定的恶名很快在 delphi 用户传开， delphi4.0 给 delphi 蒙上了阴影，也 使 Visual Basic 有了喘息之机。
1.2 Delphi 发展史 Delphi 发展至今，从 Delphi1、Delphi2 到现在的 Delphi xe，不断添加和改进各种特性，功能 越来越强大。
Delphi 1.0 1995 年一个开发工具中的超级明星在 Borland 诞生了，这就是 Delphi 1.0。在 Delphi1.0 中 Borland 放弃了 OWL（Object Window Library），取而带之的是全新的 Visual Component Library， 从此开始了组件(Component)技术的时代，其意义深远；Delphi1.0 是完全面向对象的。它是 Delphi 的最早版本。
序能正确地运行。 在代码开发与程序调试阶段，使用 Delphi 时一般包括 3 个步骤： 程序窗体设计： 包括对窗体中组件的设计。 程序代码设计： 设计窗体和窗体中组件的各种操作和响应事件的处理代码。 编译和调试程序：对程序代码进行编译，修改各种语法错误和逻辑错误，生成正确的可执行
代码。
2.3 常量与变量 二者都是存储数据的载体，不同的是常量中的值不能改变，变量中的值则随着程序的运行而改变。 一般位于函数或者过程的起始位置定义。 2.3.1 变量 变量是程序设计最基本的要素，是实现人与计算机交流的最基本的媒介，变量中可以存放字符、 数值、日期或对象等。 1. 变量的声明 变量说明的一般形式为：
Delphi 6.0
1
2001 年：Delphi 6 添加了对如下特性的支持：对 CLX(Component Library for Cross-Platform CLX)跨平台开发的支持，扩展的运行库(run-time library)，dbExpress 数据库引擎，Web 服务和杰 出的 XML 支持，一个强大的 Web 开发框架，IDE 的更多增强，大量的组件和类，delphi 开始为向.net 过渡做准备。
Delphi 5.0 1999 年：在失败的 Delphi4 以后，Borland 小心的推出了 Delphi5.0，重新建立 delphi 的声望， delphi 受到 delphi 开发人员一致推崇。在这个版本中 Delphi 对 IDE(集成开发环境)进行了很多改进， 扩展了对数据库的支持(ADO 和 InterBase 数据库)，转换功能，框架概念以及很多的新组件与新特性。
与标识符类似 3. 局部变量和全局变量
从作用范围来划分：局部变量和全局变量，在过程或函数内部声明的变量称为局部变量，否则称 之为全局变量。
局部变量在它所在的过程或函数执行完后由系统自动释放，全局变量在程序被关闭时释放。在声 明变量时，局部变量不能初始化，全局变量可以初始化，但在声明多个同类型变量时不能初始化。 2.3.2 常量 1. 字面常量
Delphi 7.0 2002 年：Delphi 7 是 Delphi 向.net 过渡的产品，在照顾老的使用者的同时，Borland 在其中加 入了对.net 的支持，所以 Delphi7 可以同时编写原 windows 下和.net 下的应用程序。2002 年 11 月， borland 为 delphi7 提供了修改后的 ，使 vcl 组件可以在.net 环境下使用。
第 1 章 Delphi 基础知识
1.1 为什么选择 Delphi Delphi 是美国 Borland 公司推出的一种基于客户/服务器体系的 Windows 快速应用开发工具（RAD Rapid Application Development），是一种面向对象的可视化编程工具，即根据 Delphi 的可视性， 又结合 Object Pascal 语言的编程技巧，可以开发出功能强大的 Windows 应用程序和数据库应用程 序。 Delphi 是第一个集可视化开发环境、优化的源代码编译器和可扩展的数据库访问引擎于一身 的 Windows 开发工具。它具有以下优点： 1. 优秀的可视化开发环境 2. 高效率的编译器 3. 结构良好的编程语言 4. 对数据库和网络编程的灵活支持 5. 层次清晰和可扩展的框架
不分大小写。
命名原则：用意思明确的英文单词或者词组命名，且首个字母大写，若是多个单词（不能在单词
间插入空格），采用驼峰格式。
例： jklasdf
//没有意义
Mylongidentifier
//可读性差
Thisismuchmorereadableroutinename //可读性差
MyLongIdentifier
ThisIsMuchMoreReadableRoutineName
注意：命名的第一个字母尽量不要用 T，F，I 这三个字母。
2.1.3 空白
源代码中的空格、空行及制表符等称为空白区。使用空白可序便于阅读理解。不要在源代码中保留 Tab 字符。
2.2 基本概念 2.2.1 进制
Delphi 8.0 2003 年：Delphi 8 for .NET 集成开发环境提供了许多工具和特性以帮助你快速创建强大的.NET 应用程序。它是为了与微软的 visual studio. Net 竟争而设计的。Delphi 8 for .NET 已经拥有 C# 的能力，同时仍然保留 Delphi 的易用性可以，但它只是一个测试版，一个过渡版。还不太完善。
2
第 2 章 Delphi 语言基础
2.1 编程风格
2.1.1 注释
块注释：通常被用在版权注释中，也被用来注释掉一些代码行。
{ 注释 }
（* 注释 *）
单行注释：作用域只是它所在的一行，使用方便。
//
2.1.2 命名
命名对象可以是常量、变量、函数、过程等用户自已书写的定义的标识。在 Object Pascalj 里
Delphi 2.0 1996 年 Delphi2.0 完成了 16 位到 32 位的跨越，提供了 32 位操作系统的完整支持，只能在 Windows 95 以上的操作系统中使用，它如同 Delphi 1.0 一样大获成功。 在 Delphi2.0 中 Borland 为它增加了可视的 Form 的继承，并且面向对象更彻底。由于所有函数 支持"虚函数"特性，对程序编写和维护非常方便，大量类似的报表也采用了此技术。 Delphi 2.0 中，增加了 Data Modules 的概念，可以将数据包装在一个模块中，在系统启动时或 空闲时 将它打开，这样，所有使用这些 Table 的模块都可以公用它，避免重复打开和关闭。并且， 由于所有数据 Table 位于一个模块中，非常便于管理维护和迁移升级。
教材第 24 页表 2-1。 2.2.3 标识符
标识符用作常量、变量、数据类型、属性、过程、函数、单元及程序等的名称。由一个或多个字 符序列组成，其构词规则如下： （1）标识符由字母、数字或下划线组成； （2）标识符的第一个字符必须是字母或下划线； （3）标识符的长度不应超过 255 个字符，否则只有前 255 个字符有效； （4）不能将保留字用作标识符； （5）标识符不区分大、小写。 例如：x、x1、max、a15、Button_OK 都是合法的标识符，而 5x、x-y、α、ax10.5 等都是非法的标 识符。
3
标准标识符：在 Object Pascal 语言中，有一类标识符是系统预先定义的，它们用于标识系统预 先定义的标准函数、标准过程、标准类型、标准常量及标准文件等。
标准常量，如 False、True 等。 标准类型，如 Boolean、Char、String、TDateTime 等。 标准函数，如 Abs、Eof、ShowMessage、Sqrt 等。 标准过程，如 Dispose、New、Read、Readln、Reset 等。 标准文件，如 Input、Output 等。 注意： 当程序中自定义的标识符与其引用的单元中所定义的重名时，如果要访问被引用单元的标识符， 则必须指示为外部单元的标识符，不然访问的是本程序定义的标识符。
2005 10.0 发布名称:Borland Developer Studio(BDS) 2006。集成 C++ Builder; ECO(Enterprise Core Objects)升级到 ECO III; 集成 Together for Delphi，可以在同一个 IDE 中 进行 UML 开发；QA Audits 和 QA Metrics 可以快速的把握专案的设计和代码的质量。
1.3 第一个程序 开发一个应用程序一般要经过以下几个阶段： 需求分析与总体设计。此阶段的任务是让程序开发人员充分理解系统的需求和任务，给出实
现这些需求与任务的总体方案。 代码开发与程序调试。此阶段按照设计方案使用编程语言开发出应用程序。在开发的过程中
反复调试以修改语法错误和逻辑错误，最终生成符合要求的可执行文件。 投入运行与程序维护。经测试无误的应用程序就可以投入运行了。程序的维护是为了保证程