Delphi程序设计与应用教程.ppt

《Delphi程序设计与应用教程.ppt》由会员分享，可在线阅读，更多相关《Delphi程序设计与应用教程.ppt（409页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、Delphi程序设计与应用教程宁正元 主编 刘雄恩 陈琼 副主编本章学习要点了解Delphi的特性；熟悉Delphi集成开发环境（IDE）了解编制Delphi应用程序的一般步骤；掌握程序项目的文件组成和类型，以及DelphiIDE的基本组成部分第一章DelphiDelphi简介简介1.1Delphi概述1.2Delphi7集成开发环境1.3Delphi程序的基本结构1.1Delphi概述一、Delphi的主要特点的主要特点二、Delphi7的启动与退出的启动与退出一、Delphi的主要特点的主要特点Borland公司的Pascal编译器Delphi以ObjectPascal为编程语言Delph

2、i充分发挥了Windows的强大功能Delphi提供了丰富的32位可视组件库Delphi在数据库和网络处理功能方面是同类产品中最强的二、二、Delphi7的启动与退出的启动与退出启动Delphi7选择【开始】【程序】【BorlandDelphi7】【Delphi7】命令。退出Delphi7选择【File】【Exit】命令。1.2Delphi7集成开发环境主窗口对象浏览器对象树状列表窗体设计器代码编辑器一、主窗口菜单栏：菜单栏及所属各级菜单包含了Delphi的全部命令和功能。工具栏：放置了菜单栏中某些主要功能的快捷按钮。（1）工具栏显示：【View】【Toolbars】（2）工具栏按钮的增删：【

3、View】【Toolbars】【Customize】组件栏：包含了Delphi的可视化组件，例如，按钮、列表框、编辑框等。Delphi将组件按功能的不同放在不同的标签上。按组件的名称查找组件：（1）【View】【Component List】（2）在“Search by name”下的文本框中输入组件名称（3）单击“Add to form”按钮 二、对象浏览器对象选择器属性页用来观察、设置窗体及其上的组件设计时的属性事件页列出组件能响应的各种事件三、对象树状列表 对象树状列表中显示出放置在窗体、数据模块或框架上的可见及不可见的组件关系结构图。节点在对象树状列表中以黑白图标显示，通过拖动组件可以

4、创建和改变组件之间的关系。四、窗体设计器Delphi的窗体设计器是接受组件的一个窗口，在窗体中放置适当的组件，安排好位置并设置组件的属性，整个程序的界面设计就完成了。首次启动Delphi时，默认的窗体是标题为“Form1”的窗口，一个应用程序可能有不止一个窗口，这些窗体也可以是对话框(Dialog Box)、数据模块窗口等。五、代码编辑器在默认情况下，代码编辑器隐藏在窗体设计器之下，在代码编辑器和窗体设计器之间进行切换可以按F12键。代码编辑器用来写Delphi应用程序的源代码。它具有带颜色的语法高亮，将光标放在某个字符上，按下F1键，可以获得与该字符相关的语法帮助。当程序中含有多个窗口时，会

5、有多个单元出现在代码编辑器中。单击单元页标签，可以实现多个单元之间的切换。六、一个简单的程序Delphi应用程序的一般步骤：设计程序的用户界面选择组件放置组件排列组件设置组件的属性添加代码编译运行程序保存文件1.3Delphi程序的基本结构项目文件窗体文件单元文件一、项目和项目文件开发应用程序的所有相关文件都组织在一个项目中，Delphi项目中包含的文件很多，大部分是由Delphi自动创建并维护的。我们只需要关注项目文件、窗体文件和单元文件。每一个Delphi应用程序都有一个扩展名为dpr的项目文件，是由Delphi自动建立并维护的，一般情况下不必修改它的内容。项目文件是特殊的单元文件，可以理

6、解为主单元文件或主程序。在Delphi中用【OpenProject】操作打开一个项目文件，就意味着装入整个项目。二、窗体文件窗体在设计阶段可以用来放置各种组件，在运行阶段是与用户交互的界面。窗体中的所有信息保存在两个主名相同扩展名不同的文件中，一个是扩展名为DFM的窗体文件，另一个是每个窗体对应的单元文件。窗体文件中保存了关于设计窗体击及其组件的各项属性，它是一个二进制代码文件。查看文件内容，可以用鼠标右击窗体，选择“ViewAsText”命令，可以看到该窗体文件的文本形式。选择“ViewAsForm”命令，可以切换回窗体。三、单元文件单元文件保存了Delphi程序的基本模块，包含了窗体及其组

7、件的事件处理程序，在Delphi中编写的程序代码，绝大多数被保存在这种文件中，其扩展名为.pas。一个标准的单元文件格式如下：unitUnit1;/单元头interfaceuses单元列表接口部分implementationuses单元列表实现部分initialization初始化部分finalization结束部分end.第二章 Object Pascal语言基础 2.1词法符号2.2常量与变量2.3简单数据类型2.4结构类型2.5运算符优先级2.6 语句与流程控制语句与流程控制2.7 过程与函数过程与函数 2.8 程序与单元的结构程序与单元的结构 2.9 标识符的作用域标识符的作用域 2.

8、1 词法符号例2-1：了解Delphi源程序 由程序可见，Delphi源程序是由单词和符号组成的纯文本。一、基本符号Object Pascal语言仅使用以下几类基本符号：1.大小写英文字母A、B、C、Z等26个大写，和a、b、c、z等26个小写字母。2.数字符号0，1，2，3，4，5，6，7，8，9等。3.其他符号有+，-，*，/，=，(，)，_，;，:，,，.，#，$，及空格符等。二、保留字、标识符、标准标识符、指令字1.保留字 程序如同一篇文章，由字符组成单词，再由单词和符号构成句子语句。其中有一类单词，它们具有特定的语法含义，称为保留字（reserved words）。程序员不得重新定义

9、保留字的语义。常用的保留字如：begin、end、if、and、for、do等。2.标识符标识符用作常量、变量、数据类型、过程、函数、单元及程序等的名称。由一个或多个ASCII码字符序列组成，其构词规则如下：（1）标识符由字母、数字或下划线组成；（2）标识符的第一个字符必须是字母或下划线；（3）标识符的长度不应超过255个字符，否则只有前255个字符有效；（4）不能将保留字用作标识符；（5）标识符不区分大、小写。例如：x、x1、max、a15、Button_OK都是 合 法 的 标 识 符，而 5x、x-y、ax10.5等都是非法的标识符。3.标准标识符在ObjectPascal语言中，有一类

10、标识符是系统预先定义的，它们用于标识系统预先定义的标准函数、标准过程、标准类型、标准常量及标准文件等。标准常量，如False、Maxint、True等。标准类型，如Boolean、Char、String、TDateTime等。标准函数，如Abs、Eof、ShowMessage、Sqrt等。标准过程，如Dispose、New、Read、Readln、Reset等。标准文件，如Input、Output等。标准标识符是可以重新定义的。（例2-2）注意：（1）当程序中自定义的标识符与其引用的单元中所定义的重名时，如果要访问被引用单元的标识符，则必须指示为外部单元的标识符，不然访问的是本程序定义的标识符

11、。（2）因System单元是自动引用的，不必也不允许在引用部分列出System单元。4.指令字指令字为编译提供指示意义。各 指 令 字 有 它 专 门 的 用 途，如：absolute指令字用于指示相同类型的另一标识符存放在同一个内存区域。如下面代码：varI:Integer;J:Integer absolute I;这里用到了指令字absolute，它声明变量J和已存在的同类型变量I的值驻留在同一段内存单元中，即I与J实为同一变量。2.2 常量与变量常量：在程序中，值始终保持不变的量，包括字面常量、符号常量和类型常量等。变量：变量是一种可随时更改其值的量。一个变量在某一个时刻有且仅有一个值。

12、一、常量1.字面常量（1）整型常量即整数，如3、10000、-90。在ObjectPascal中十六进制形式表示整型常量以字符$开头，如$20相当于十进制的32。（2）实型常量即实数，例如，6.6、0.77e+4。后者的表示方法称为指数记数法或科学记数法，0.77e+4表示0.77104。Pascal语言中的实数表示和日常书写的形式基本相似，但要注意以下几点：小数点前后一定要有数字。数中不允许包含空格字符与逗号。例如1，000，000是不合语法的。没有分式表示。使用指数记数法时，e前面应有整数或实数，e后面必须是整数。例如：88.0、-0.8、1e+23、-3.45e-6都是正确的实数表示法，

13、而88.、.66、e6则是不正确的。（3）布尔常量它是指False和True这两个值，False表示逻辑值“假”，True表示逻辑值“真”。（4）字符常量字符常量有两种表示方式：用单引号对括起来的单个字符，如a、*、2等。用#引导一个整数，整数表示该字符的ASCII码。例如，#13、#$20、#$30、#65分别表示回车符、空格符、数字符号0、字母A。因单引号用于定界字符常量，所以用表示单引号字符。（5）字符串常量字符串常量是用单引号对括起来的一串字符，例如，Good idea、96.5、#=。当字符串内有单引号时，要用两个连续单引号表示，例如，Most childrens English C

14、ourse。书写字符串需要注意以下几点：空格字符可以是字符串的组成部分。所以在字符串中的任何空格字符都是其值的一部分；字符串中的字母有大小写区分，即A1不等于a1。2.符号常量字面常量可以在程序中直接使用，而由标识符表示的符号常量需预先定义。常量定义的一般形式为：const =表达式;以保留字const后开始常量声明；“=”号左边为常量标识符；“=”号右边的表达式可以由常量、部分在程序编译时可计算的函数，及先定义的常量标识符等构成，表示符号常量的值。Object Pascal对常量定义有如下要求：必须遵循先定义后使用的原则，即只有已定义的常量标识符才能在程序中使用。不能改变符号常量的值。可用于

15、常量定义的函数，即在程序编译时可计算的函数，有Abs、Chr、Hi、Length、Lo、Odd、Ord、Pred、Ptr、Round、SizeOf、Succ、Swap、Trunc等。使用常量定义的意义在于减少常量值差错机会与修改程序的工作量，并提高程序的可读性。二、类型常量 类型常量定义在Pascal程序的声明部分，以保留字const开头。一个类型常量定义部分可包含多个类型常量定义，每个类型常量定义末尾均有分号，其一般形式为：const :=表达式;例：constPi:Double=3.1415926;类型常量的用法同变量完全一样，可以对类型常量重新赋值。三、变量 变量说明的一般形式为：var

16、 :;其中，变量标识符列表中可以包含一个或多个变量标识符，若有多个变量标识符时，相邻的两个变量标识符之间应使用逗号“,”隔开；类型标识符用以指定这些变量的数据类型。变量说明以保留字var开头。一个变量说明部分可包含多个变量的说明，每个变量说明末尾均有分号。2.3 简单数据类型 在Object Pascal语言中，每个数据都有一个确定的类型，某种数据类型定义了该类型数据的存储方式和允许的一组运算，存储方式的定义相应地便确定了该类型数据的取值范围。Object Pascal是一个强类型语言，拥有丰富的数据类型，并允许程序员自定义新的数据类型。常见的分类方法中，数据类型分为简单类型、字符串类型、结构

17、类型、指针类型、过程与函数类型和可变类型等。一、有序数据类型 有序数据类型定义的是取值有序的数据集。其特点是：数据的分布是离散的；除了第一个元素外，其他任何元素都有一个前驱元素；除了最后一个元素，其他任何元素都有一个后继元素。Object Pascal提供的有序数据类型有：整型、字符型、布尔型、枚举型和子界型等五种类型。常用的有序数据操作函数有：ord、prec、succ、high、low；常用过程有：inc、dec。1.整型（1）存储格式和取值范围 整型仅表示整数的一个子集，通用的整数数据类型包括Integer和Cardinal，其 它 基 本 的 整 型 包 括 Shortint、Smal

18、lint、Longint、Int64、Byte、Word和Longword。（2）运算符算术运算符：、-、*、div（整除）、mod（取模），若参加算术运算的两个数都是整型数据，则运算结果也是整型。关系运算符：=、=、=、关系运算的结果是布尔型，即取True或False值。例如：5=5的值为True；55的值为False。正负号运算符：+、-与加、减运算不同，此为单目运算。如-a，求运算元的负值。整型数的逻辑运算符：not、and、or、xor 整数转换为二进制数后逐位进行逻辑运算。其中not是单目运算符。例：0000000001010110(86)10and0000010100010100(

19、1300)100000000000010100(20)10左、右移位运算符：Shl、Shr Shl运算符的运算格式为A Shl n，表示将整型数A的各位向左移n位，高位溢出，低位补0。Shr运算符的运算格式为A Shr n，表示将整型数A的各位向右移n位，低位溢出，高位补0。如：00000000 01010110左移2位后，为00000001 01011000，即：表达式86 Shl 2的值为344。例2-3：交换一个字符序号值的高4位和低4位。（3）标准函数和标准过程 绝对值函数Abs(x)，函数值为|x|。例如：Abs(-100)的值为100，Abs(99)的值为99。平方函数Sqr(x)

20、，函数值为x2。例如：Sqr(-4)的值为16，Sqr(3)的值为9。奇函数Odd(x)，函数的结果为布尔型。当x为奇数时，函数值为True；当x为偶数时，函数值为False。例如：Odd(3)的值为True，Odd(4)的值为False。字符函数Chr(x)，函数返回ASCII码值为x的字符。例如：Chr(65)的值为A。取高、低字节函数Hi(x)和Lo(x)，分别返回整型数x的高字节和低字节，结果是Byte类型。例如：Hi($1234)的值为$12，Lo($1234)的值为$34。交换函数Swap(x)，将整型数x的高字节和低字节进行交换，交换后的两个字节重新组成一个整数作为函数返回值。例

21、如，Swap($1234)的值为$3412。其他操作函数或过程：ord、prec、succ、high、low、inc、dec。例：有序数操作函数2.字符型 基本的字符型有AnsiChar和WideChar两种。AnsiChar类型的数据是一个字节（8位）编码的，与扩充的ANSI字符集对应。而WideChar是两个字节（16位）编码的，与Unicode字符集对应，Unicode字符集的前256个字符和ANSI字符集相同。通用字符类型是Char，和AnsiChar相当。（1）取值范围（2）运算符 Object Pascal语言允许用=、=、=六个关系运算符对字符型数据进行运算操作。用字符序号的大小

22、关系来定义相应字符的大小关系，因此，所有的字符都可以进行比较（即关系运算）。AB /结果为Trueba /结果为False 1False /结果为True逻辑运算符：not（非）、and（与）、or（或）、xor（异或）。（3）标准函数 例：有序数的操作函数4.枚举类型（enumerated）枚举类型是一个以标识符标识的有序整型常数的集合，这些常数是该类型变量可取的合法值。声明枚举类型的语法如下：type typeName=(val1,.,valn)；其中typeName和vali是有效的标识符，typeName 是枚举类型，vali是枚举量的标识符。例：typeTWeekDay=(Sunda

23、y,Monday,Tuesday,Wednesday,Thursday,Friday,Saturday);这些枚举量不能再定义为其它标识符。当用Ord函数分别对其取值时，将得到0、1、2、3、4、5、6。在默认的情况下，枚举值是从0开始的有序整数，在实际编程的过程中，可以越过这种限制，可以根据需要指定标识符表中的值。例如：type MyColor=(red=2,green=6,white=7,black=9);一些枚举类型的值只有两种可能的值，如下声明：type SampleEnum=(val1,val2,val3=0);SampleEnum中val1、val2、val3的Ord函数值分别为：

24、0、1、0，即Ord(val1)与Ord(val3)相同。枚举量的取值范围为0255。例2-4：匿名访问枚举量 5.子界类型（Subrange）声明形式如下：type 类型标识符=上界值.下界值;其中上、下界值是某种已定义的有序类型的值，上界值小于或等于下界值，如：type TAge=18.60；/TAge是一个整型的子界类型typeCaps=A.Z;/Caps是一个字符型的子界类型 子界类型变量的值是有序的，对其进行增/减量操作都要在其定义范围内。二、实数类型 1.存储格式和取值范围Object Pascal语言中用Real标识通用实型。基本实型有6种：Single（单精度）、Double（

25、双精度）、Extended（扩展型）、Real48、Comp（十 进 制 组 装 型）和Currency（货币型）。Real与Double实际上是相同的类型。2.运算符（1）算术运算符：、-、*、/在使用这几个运算符时，只要有一个运算对象是实型，则运算结果也是实型。其中，“/”称为实数除，即使两个整数相除，其结果也是实型。（2）关系运算符：=、=、=、”与“”运算时应谨慎，因为实型类型的表示是近似值，相近的实数的存储表示可能是一样的。可采用差的绝对值与一任意小的数比较。例：X=Y运算应当写成Abs(X-Y)1e-6；而XY运算应写成Abs(X-Y)1e-6。3.标准函数（1）绝对值函数Abs(

26、x)：函数值为x的绝对值。（2）平方函数Sqr(x)：函数值为x的平方。（3）正弦函数Sin(x)：函数值为x的正弦，其中x的单位为弧度。（4）余弦函数Cos(x)：函数值为x的余弦，其中x的单位为弧度。（5）反正切函数Arctan(x)：函数值为x的反正切，函数值的单位为弧度。（6）指数函数Exp(x)：函数值为指数ex。（7）对数函数In(x)：函数值为x的自然对数。（8）平方根函数Sqrt(x)：函数值为x的平方根。（9）舍入函数Round(x)：对实数x作四舍 五 入，结 果 为 整 数。例 如：Round(5.6)的值为6，Round(-7.6)的值为-8。（10）截尾取整函数Tru

27、nc(x)：截去实数x的小数部分，结果为整数。例如：Trunc(-9.9)的值为-9，Trunc(7.8)的值为7。（11）取整函数Int(x)：截去实数x的小数部分，返回整数部分。（12）取小数函数Frac(x)：返回实数x的小数部分，结果为实型。三、日期时间类型1.存储格式和取值范围日期时间型TDateTime在Object Pascal中实际是双精度浮点型（Double）；其原型是：TDateTime=Double;TDate=TDateTime;TTime=TDateTime;Object Pascal中规定：以1899年12月30日12:00时为准计为0，每增加1天，日期时间类型数据

28、增1。因此，整数部分表示距离该日该时的天数。例：0：1899年12月30日 12:00 2.75：1900年1月1日 18:002.运算符Object Pascal提供了如下日期时间运算符：（1）加减运算符：+、-D+N、或D N计算某个日期之前或之后若干时间的日期。其中，D是日期时间型的数据，N是实数。表达式的值为日期时间型数据。D1-D2 计算两个日期时间的时间间隔。其中D1、D2为日期时间型数据，结果为实型数据。结果为负数则表示D1时间在D2时间之前，否则相反。3.标准函数和过程（1）Date()：函数返回系统当前日期，无参数，返回数据是TDateTime型。（2）Time()：函数返回

29、系统当前时间，无参数，返回数据是TDateTime型。（3）Now()：函数返回系统当前日期和时间，无参数，返回数据是TDateTime型。（4）StrToDate(日期字符串)：字符串转换为日期时间函数，返回数据是TDateTime型；StrToTime(时间字符串)：参数为时间串，返回数据是TDateTime型；StrToDateTime(日期时间型串)：参数为日期时间串，返回数据是TDateTime型。如：StrToDate(10/1/2004);StrToTime(12:50:24);StrToDateTime(10/1/2004 12:00:00);（5）取日期时间中的部分数据，以下

30、函数的参数均为日期时间型：Dateof(参数)：返回去掉时间后的日期（TDateTime型）；Timeof(参数)：返回去掉日期后的时间（TDateTime型）；Yearof(参数)：返回日期的年份（Word型）；Monthof(参数)：返回日期的月份（Word型）；Dayof(参数)：返回日期的日号（Word型）；Weekof(参数)：返回日期在该年份是第几个星期，返回1到53之间的整数。（6）日期时间转换为字符串的函数，返回值为字符串，如：TimeToStr(参数)：将时间数据转换为字符串返回；DateToStr(参数)：将日期数据转换为字符串返回；DateTimeTostr(参数)：将日

31、期时间数据转换为字符串返回。此 外，还 有 Hourof、Minuteof、Secondof、FormatDateTime等。例2-5：使用日期时间2.4 结构类型结构类型是能够描述和扩展定义较复杂的数据的存储类型，通过结构类型，程序中可以存储结构复杂数据。结构类型可通过将多种基本数据类型结合在一起，也可以通过扩展预先定义的数据类型来得到。结构数据类型有下面的几类：集合类型（set）、数组类型（array）、记录类型（record）、文件类型（file）、类类型（class）、类 引 用 类 型（class reference）、接口类型（interface）。在使用结构类型时，Object

32、Pascal语言提供了一种压缩机制，可以最大限度地节省结构类型的存储空间。在声明结构类型时引用保留字packed，数据将以压缩方式存储，但是，这样延缓了数据的访问速度，还会产生类型的兼容性的问题。一、集合类型格式：set of baseType;其中baseType是集合中元素的类型或值域。Object Pascal中规定了基类型只能是不超过256个有序值的集合，集合的元素的序数值必须介于0和255之间。typeTSetA=set of Integer;/错误TSetB=set of 255.300;/错误TSetC=set of WideChar;/错误TsetD=set of 10.50;

33、/正确TsetE=set of char;/正确1.集合的并、交、差运算集合运算有：交（*）、并（+）、差（-），运算对象是两个相同类型的集合，运算结果也是集合。如：x为1,3,5，y为3,4,5，则x*y 为3,5，x+y为1,3,4,5，x-y为1。2.集合的关系运算（1）运算符=、判断两个集合相同或不相同。如：表达式 1,3,5=3,1,5 的值为True；（2）=(包含)、=3 的值为True；（3）属于运算in，如：表达式 3 in 3,5 的值为True。二、数组类型 数组类型数据表示的是同种类型数据的集合。数组类型的数据是排列有序的，每个数据元素都有一个唯一的索引号。与集合类型不

34、同的是，数组类型的数据可以重复。数组类型分为静态数组和动态数组。1.静态数组：在声明时指定了数组的大小。定义静态数组的语法形式如下：type 数组类型标识符号=array indexType1,.,indexTypen of baseType;其中，indexType是有序类型，indexType通常是以Integer为子界的，也可以是其它有序类型的子界；baseType声明元素的数据类型；数组由同一类型的数据元素组成。例：type Tarr1=Array 1.10 of Integer;Tarr2=Array 1.3,1.5 of Char;var a:Tarr1;/声明变量a是Tarr1类

35、型数组b:Tarr2;/声明变量b是Tarr2类型数组也可以声明变量时直接定义数组的类型，如：var a:Array 1.10 of Integer;数组元素的访问是通过数组名后面加上方括号和下标值来访问的。如：a1:=10;2.动态数组：在定义时并没有确定数组的大小或长度，而是在访问之前用SetLength过程为数组动态或重新分配其存储空间。定义动态数组的语法形式如下：Var 数 组 类 型 标 识 符：array of baseType;例如：var DynArr：array of Integer;声明DynArr为元素是整型的动态数组。也可以先定义类型，再声明变量，如：type Tdyn

36、IntArr=array of integer;var DynArr:TdynIntArr;语句SetLength(DynIntArr,10);为动态数组DynIntArr分配10个元素的存储空间，下标从0到9（动态数组的下标总是从0开始）。如要释放动态数组占用的存储空间，可以将nil赋值给该动态数组变量，或调用过程SetLength(DyIntArr,0)实现。多维动态数组通过使用嵌套的“array of.”结构实现，例如：type TGrid=array of array of String;/定义二维动态字符串数组类型Tgrid例2-6：输出下三角的乘法表三、字符串类型1.取值范围 字符

37、串是一个由字符组成的系列，AnsiString也称作LongSting，是多数情况下推荐使用的类型。各字符串类型可以混合在赋值和表达式中，编译器将自动执行转换。String型是字符串的通用类型。在默认的$H+状态，编译器将String解释为AnsiString，用$H-编译指令可以指示编译器将String解释为ShortString。对字符串访问就像对数组的访问一样，如：str是字符串变量，i是整型表达式，则stri表示该字符串的第i个字符。例2-7：将字符串中的字符转换为大写。对于通用字符串类型String，在定义String型变量时可以指定其最大的长度（0 255），此 时 String型

38、 被 视 为ShortString型。ShortString型不是以Null（空字符#0）作为字符串的结束标志，而将长度保存在字符串数组的下标为0的存储单元中。在不指定串的最大长度的情况下，String被视为AnsiString型，此时字符串以Null为串的结束标志。在串中不保存串的长度；ShortString不能指定最大的字符串长度，其最大字符长度固定为255。例2-8：字符串存储结构2.运算符（1）字符串合并运算符：+合并两个字符串，操作数可以是字符串、字符、压缩字符串，即把两个字符串连接为一个字符串，如，s+a、s+#abc#（s为字符串型变量）；（2）六种关系运算符：、=、=、=、字符

39、串的比较是对两个串的字符逐个比较直到其中一个串结束或遇到不同的字符为止。如：abaaba9zabcabc03.标准函数（1）合并字符串函数，Concat(s1,s2,s3,s4,.)。（2）取子串函数，Copy(字符串，开始位置，长度)。（3）取左子串，LeftStr(字符串,长度)。（4）取右子串，RightStr(字符串,长度)。（5）判断一个子串在一个字符串中的起始位置，Pos(字 符 串 A,字 符 串 B)，如：Pos(abc,axabcdef)的值为3。（6）去除字符串的左空格，TrimLeft(字符串)。（7）去除字符串的右空格，TrimRight(字符串)。（8）去除字符串的左

40、、右空格，Trim(字符串)。（9）取的字符串的长度，Length(字符串)。（10）字符串转为大写的函数，UpperCase(字符串)。4.字符串与Pchar类型在Windows API中，经常要求传递指向字符的指针。在Object Pascal中预定义了Pchar类型，Pchar是指向字符串首字符的指针（地址），字符串以Null（ASCII码 为 0的 字 符）结 尾。那 么，ShortString、String如何转为Pchar型呢？例2-9：使用Pchar和ShortString的示例 四、记录类型记录类型描述一组不同类型的数据元素集合，每个数据元素称为“域”。在定义一个记录类型时，需

41、要指定每个数据域的数据类型。定义记录类型的语法如下：type 记录类型标识符=record 域1:类型1;域2:类型2;.域n:类型n;end;例如：type TPerson=record name:String10;id:String15;sex:Boolean;age:Byte;height,weight:Real;end;访问记录域，可以使用“变量名.域名”的 形 式，如 man1.name，man1.sex，man1.age等（其中man1是上述自定义的TPerson型变量）。例2-10：使用记录的示例 记录中的域可分为固定部分和可变部分。固定部分定义一个或者多个独立的域，可以为每个独

42、立的域指定一个标识符和数据类型。含有可变部分的记录类型称为变体记录，它提供了不同域共享内存的方法，其中每个命名的变体是共享内存的，每个变体在内存中占用同一空间，采用一个常量加以区别。例2-11：使用记录可变部分示例五、指针类型指针类型的变量存储的是内存地址，利用指针可以灵活地访问内存中的数据。指针类型的声明格式如下：type 指针类型标识符=数据类型;指针可以指向任何数据类型。System和SysUtils单元声明了许多常用的标准指针。（1）指针取值运算符：取指针（地址）所指向单元的数据。（2）指针的关系运算（、=、=、），判断两个同种类型的指针的位置大小。如：P1、P2指针，P1在P2之前，

43、则：P2=P1为True；P1 P2为True。（3）移动指针运算调用过程Inc(指针类型变量,偏移量N)，使指针依据其所指数据类型往后偏移N个数据单元；过程Dec(指针类型变量，偏移量N)，使指针往前偏移N个数据单元。例2-12：指针示例六、可变类型可变类型（Variant）是指可以在程序运行期间确定或改变的数据类型。这些数据在编译期间不能确定其数据类型，而且，它们比固定类型的数据占用更多的存储空间和更多的操作时间。默认的情况下，可变类型可以是除了记录类型、集合类型、静态数组类型、文件类型、类类型和指针类型之外的任何类型，也就是说，可变类型可以是除了结构类型和指针类型之外的任何其他类型。有如

44、下变量声明：有如下变量声明：Var v:Variant;Var v:Variant;i:Integer;i:Integer;str:String;str:String;则，以下变量的使用是合法的：则，以下变量的使用是合法的：i:=10;i:=10;v:=i;v:=i;strstr:=v;:=v;2.5运算符优先级 复杂表达式中的同一括号层内，各运算的先后次序取决于运算符的优先级。按照操作数的个数可以将运算符分为两类：单目运算符和双目运算符。只有、和not是单目运算符，其他的为双目运算符。其中，+和-既可作为单目运算符（正数、负数）又可作为双目运算符（加、减）。单目运算符只能放在操作数的前面，双

45、目运算符都放在两操作数的中间。对于可变类型的数据操作，大多数操作符都可以对其进行操作，只有、is和in例外。运算符的优先级列表级级 别别运运 算算 符符第一级（最高）第一级（最高）.第二级第二级 not第三级第三级*/div mod and shl shr as第四级第四级+-or xor第五级（最低）第五级（最低）=in is2.6 语句与流程控制 程序由一系列语句组成。根据语句的复杂性，将语句分为两类：基本语句和结构语句。一、基本语句1.赋值语句赋值语句的一般格式为：:=;其中符号“:=”是赋值运算符，它表示将运算符右侧表达式运算的结果存入左侧变量相对应的存储单元中，作为左侧变量当前的值。

46、赋值运算符“:=”和符号“=”具有完全不同的含义，注意不要混淆。赋值运算符的左侧可以是变量标识符、对象的属性标识符、函数标识符等，不允许是常量或表达式。赋值运算符右侧表达式运算结果的类型必须与左侧变量的数据类型相同或相容。2.基本输入/输出语句（1）Read和Readln语句（过程）Read过程用于从外部设备（如键盘）或打开的文件中顺序读入数据，并将这些数据依次赋值给变量列表中相应的变量。Readln过程与Read过程不同在于前者读入数据后，自动读取换行符。二者语法形式如下：Read(文件变量,变量列表);Readln(文本文件变量,变量列表);省略文件变量参数，则表示从键盘输入中读取数据。（

47、2）Write和Writeln语句（过程）与输入语句类似，也存在两种形式的输出语句：Write(文件变量,输出项表)；Writeln(文本文件变量,输出项表)；输出项可以是常量、变量、函数、字符串或表达式。如果输出项是常量，则语句直接输出常量的值；如果输出项是变量，则输出该变量所对应存储单元的数据内容；如果输出项是字符串，则直接输出字符串；如果输出项是表达式，则首先对表达式进行计算，然后输出表达式的运算结果。Writeln与Write的不同在于前者输出“输出项表”后自动输出换行符。另 外，PutChar(ch:ShortInt)过 程 和 GetChar()函数可用于输出字符和输入字符。3.复

48、合语句复合语句是指把若干条语句用begin 和end括起来的语句块。在语法上把语句块看成是一条语句。4.空语句空语句，即两个分号之间没有内容（除了空格），不执行任何操作。5.注释和编译指令注释的作用在于增强程序的可读性。有如下几种形式：/单行注释内容 注释内容(*注释内容*)在Delphi的源程序代码中，可以设置一些编译指令，用于指示编译器程序代码的生成方式、中间文件、编译路径等。其一般形式如下：$编译指令 参数即，在“”或“(*”符号之后紧跟符号“$”，则开始编译指令的声明。例如，$R*.DFM指示窗体文件是与单元文件同 名 的 DFM文 件；又 如，$WARNINGS OFF告诉编译器在编

49、译期间不产生警告信息。常规的编译指令也可以通过选择执行Delphi IDE的【Project】【Options】菜 单 项，在 打 开 的“Project Options”对 话 框 中 的“Compile”页上进行设置。二、分支语句分支语句根据用户输入或程序运行的中间结果来确定转向执行哪个分支流程。Object Pascal提供的if语句和case语句用来实现程序的分支结构。1.1.ifif语句语句ifif语句有语句有3 3种格式：种格式：if if 条件表达式条件表达式 then then 语句；语句；语句（块）语句（块）条件表达式条件表达式TrueTrueFalseFalse 其语义为：

50、判断条件是否为真，为真则执行then之后的语句A，为假则执行语句B。其中语句A和语句B可以是复合语句。if 条件表达式 then 语句A else 语句B;在else之前不能加分号，因为分号是语句的分隔符，而ifthenelse是一个完整的语句结构。条件表达式语句A语句BTRUETRUEFALSEFALSEif 条件1 then 语句1 else if 条件2 then 语句2 else if 条件3 then 语句3 else 条件表达式条件表达式1 1语句语句1 1条件表达式条件表达式2 2语句语句2 2例例2-132-13：输输入入两两个个整整数数，比比较较二二者者的的大小。大小。嵌套过