《Delphi程序设计实训教程高职 教学课件 ppt 作者 占跃华 第1－4章 第3章》由会员分享，可在线阅读，更多相关《Delphi程序设计实训教程高职 教学课件 ppt 作者 占跃华 第1－4章 第3章（99页珍藏版）》请在金锄头文库上搜索。
1、,第3章 Object Pascal程序设计语言,3.1 Object Pascal语言基础 3.2 语句 3.3 过程与函数 3.4 Object Pascal的面向对象编程基础 3.5 本章小结,3.1 Object Pascal语言基础 3.1.1 Pascal 程序的基本组成 【例3.1】 计算半径为r的圆的面积S。 program Area; 程序首部 const 说明部分-数据描述 pi=3.14159; var s,r:real; begin 执行部分 readln(r); s:=pi*sqr(r); writeln(s=,s); end.,1. 程序首部 例3.1的第一行称为程
2、序首部。program是保留字，之后是程序名(依据“标示符“规则自行定义)，最后以分号表示程序首部结束程序主体的开始。程序首部在一个Turbo Pascal(仅在Turbo Pascal中有效)程序中并非必须出现，它是可选的。因此，在时间有限的情况下，如果在Turbo Pascal环境下编程则完全可以省略程序首部。,2. 说明部分 说明部分用于定义和说明程序中用到的数据，依次由单元说明、标号说明、常量说明、类型说明、变量说明、函数或过程说明组成，说明的次序不能改变，但各个部分是可选的。一个简单的Pascal程序也可以不包含说明部分。例3.1的第二行是常量说明，第三行是变量说明。,3. 执行部分
3、 执行部分描述了程序要执行的操作。执行部分必须以一个Pascal保留字begin开始，以保留字end后跟句点结束，其间是一些执行具体操作的语句，并且以分号作为语句之间的分隔符。begin 和end必须成对出现，这是一个Pascal程序所必需的。紧跟end之后的句号表示执行部分的结束，也表示整个程序的结束。此后的任何语句都无效。Pascal规定紧随end之前出现的分号允许省略。如例3.1中从begin到end都是执行(语句)部分。,3.1.2 基本字符和符号 1. 基本符号 AZ az 09 + - * / = = ( ) := ， ； . ： 注意：Pascal语言除了能使用以上规定的基本符号
4、外，不得使用任何其他符号。,2. 保留字 保留字在Pascal语言中具有特定的含义，在进行程序设计时不能被重新定义或进行它用，必须了解它的含义，以便于正确地使用，否则会造成错误。Object Pascal语言中的保留字一共有65个：,Object Pascal语言是不区分大小写的，所以像And、AND、and等都被看做是保留字。此外，Object Pascal语言中还定义了39个指令字(Directives)，它们也具有特殊的含义，如果用户重新定义了这些指令字，在作用域内它们就失去了原来的意义。这些指令字为：,尽管private、protected、public、published和autom
5、ated都是指令字，也应该将它们当作关键字来看待，不要定义与它们同名的标识符。 在Delphi集成开发的代码编辑器中，关键字和指令字将以粗体显示。在定义标识符时不要定义与这些粗体显示的关键字和指令字一样。,3. 标识符 1) 标识符的定义 标识符是用来标识程序、过程、函数、类型、符号常量、变量、对象等的名字的符号。 Object Pascal语言中规定，标识符由字母AZ、az、下划线和数字09组成。标识符的命名有以下3条限制： 首字符必须是字母或下划线，不能是数字； 标识符不能和保留字相同； 缺省状况下，Delphi只认为标识的前255个组成字符是有意义的。,在Object Pascal语言中
6、，标识符也不区分大小写，所以标识符Myname、MyName、myname、myName 和MYNAME被认为是同一个标识符。总体上来说，这是Pascal的一大优点，因为在大小写敏感的语言中，许多语法错误是由不正确的大小写引起的。 Pascal语言的大小写不敏感也有例外，如控件包中的Register过程必须以大写字母R开始，一些API函数调用参数也必须按要求大小写等。,在Object Pascal语言中，标识符也不区分大小写，所以标识符Myname、MyName、myname、myName 和MYNAME被认为是同一个标识符。总体上来说，这是Pascal的一大优点，因为在大小写敏感的语言中，许
7、多语法错误是由不正确的大小写引起的。 Pascal语言的大小写不敏感也有例外，如控件包中的Register过程必须以大写字母R开始，一些API函数调用参数也必须按要求大小写等。,保持大写使用的一致性是值得提倡的好习惯，尽量保持大写使用的一致性，可以提高代码的可读性。一个常用的方法是将每个标识符的第一个字母大写；标识符若由几个词组合而成(中间不能插入空格)，每个词的第一个字母应大写，例如： MyLongIdentifier MyVeryLongAndAlmostStupidIdentifier,保持大写使用的一致性是值得提倡的好习惯，尽量保持大写使用的一致性，可以提高代码的可读性。一个常用的方法
8、是将每个标识符的第一个字母大写；标识符若由几个词组合而成(中间不能插入空格)，每个词的第一个字母应大写，例如： MyLongIdentifier MyVeryLongAndAlmostStupidIdentifier,2) 标识符的分类 (1) 标准标识符：指Pascal语言预先定义的标识符，具有特殊含义。 以下列举了Pascal语言部分常用的标准标识符： 标准常量 False Maxint True 标准类型 Boolean Char Real Integer 标准函数 Abs Arctan Chr Cos Eof Eoln Exp Ln Odd Ord Pred Round Sin Sqr
9、 Sqrt Succ Trunc 标准过程 Dispose Get New Pack Page Put Read Readln Reset Rewrite Unpack Write Writeln 标准文件 Input Output,(2) 用户自定义标识符：由用户根据需要定义。 选用的标识符不能和保留字相同。 语法上允许预定义的标准标识符作为用户定义的标识符使用，但最好还是不要用。,3.1.3 常量与变量 1常量 (1) 常量：在某个程序的整个过程中其值不变的量。 (2) 常量定义：常量定义出现在说明部分。它的语法格式是： CONST 常量名=常量值; . 常量名=常量值;,根据常量定义的语
10、法，下面的常量定义是有效的: CONST pi=3.14; a=12; 常量的类型由定义它的常量值的类型决定。例如上述常量的定义中，隐含说明a是整型，r是实型。,(3) 常量定义部分必须以保留字const开头，可以包含一个或几个常量定义，而且每个常量均以分号结束。 (4) Pascal类型常量。类型常量又称变量常数，它是一个全局变量，只不过在编译时用指定的值预初始化，使程序在开始运行时具有指定的初值，在运行中仍然可修改。它是Pascal的一个扩充特性，类型常量的定义与标准Pascal规定的常数定义和变量说明有所区别。类型常量定义的语法格式为： CONST 常量名：简单类型=值；,【例3.2】
11、CONST COUNTER:INTEGER=0; FLAG：BOOLEAN=true; INDEX:0100=0; LEFT:INTEGER=40;,2变量 (1) 变量：在某个程序中的运行过程中其值可以发生改变的量。 (2) 变量说明：变量说明出现在说明部分。它的语法格式是： VAR 变量名:类型; . 变量名:类型; 其中，保留字VAR表示开始一个变量说明部分。变量名是一个用逗号隔开的标识符序列，冒号后面的类型是变量的类型，每个变量说明均以分号结束。,根据变量定义的语法，下面的变量定义是有效的： VAR A,B,C:INTEGER; M,N:REAL; 注意：变量名不允许重复说明。,【例3
12、.3】 VAR I,J,K:INTEGER; A,K:REAL; M,N,I:INTEGER; 其中存在两个标识符重复说明的错误：变量I和K各被重复说明了两次。,3.1.4 数据类型 数据是程序设计的一个重要内容，其重要特征数据类型确定了该数据的形、取值范围以及所能参与的运算。 Pascal 提供了丰富的数据类型，这些数据类型可以分为三大类：简单类型、构造类型和指针类型。其中简单类型可以分为标准类型(整型、实型、字符型和布尔型)和自定义类型(枚举型和子界型)，构造类型可以分为数组类型、集合类型、记录类型和文件类型。这些数据类型中除了指针类型是动态数据类型外，其他的都是静态数据类型。在这些数据类
13、型中简单类型都是有序类型，除了实型以外的简单类型都是顺序类型。所谓顺序类型，就是它们的值不仅是有序的而且还有顺序号。,1. 简单类型 1) 整数类型 整数类型简称整型，用标准类型名INTEGER来表示。Turbo Pascal支持五种整型，它们是shortint(短整型)、integer(整型)、longint(长整型)、byte(字节型)和word(字类型)，每一种类型规定了相应的整数取值范围以及所占用的内存字节数(见表3-1)。,表3-1 Pascal语言中整型变量所分配的内存字节数 及其数值的表示范围,2) 实数类型 实数类型简称实型，用标准类型名REAL来表示。 Pascal支持五种实
14、型，它们是real(基本实型)、single(单精度实型)、double(双精度实型)、extended(扩展实型)和comp(装配实型)，每一种类型规定了相应的实数取值范围、所占用的内存字节数以及它们所能达到的精度(见表3-2)。,表3-2 Pascal语言中实型变量所分配的内存字节数 及其数值的表示范围,实数有两种表示方式。一种是日常习惯使用的含有小数点的十进位表示法，例如-12.5，0.0001，-0.25，10.0。另一种是符点表示法，又叫科学表示法，例如 9.1e-28表示9.1*10-28，-1e-7表示-1*10-7。,3) 布尔型 布尔类型又称逻辑型，用标准类型名BOOLEAN
15、来表示。布尔型的值只有两个：False(布尔假)和True(布尔真)，并且False可用0表示，True可用1表示。False和True都是预定义常数标识符，可以直接用于布尔类型数据的运算中，并且规定TrueFalse。 在程序设计语言里，布尔值的产生与条件的判断是联系在一起的。关系运算符的两边可以是整型或实型数据，也可以是同为字符型或同为布尔型的数据，运算的结果产生一个布尔值。关系运算表达的是一种二值条件，即要么成立，要么不成立，例如，-3-2的取值是False，32的取值是True。,4) 字符型 字符型用标准类型名CHAR来表示。字符型数据对象的值是系统内定的字符集中的一个字符。字符型必
16、须用单引号括起来，字母作为字符型时，大小写是不等价的，并且字符型只允许单引号中有一个字符。,5) 枚举类型 枚举类型是一个以标识符标识的有序整型常数的集合，这些常数是该类型变量可取的合法值。声明枚举类型的语法如下： type typeName = (val1, ., valn)； 其中，typeName和vali是有效的标识符，typeName是枚举类型，vali是枚举量的标识符。例如： type TWeekDay = (Sunday, Monday, Tuesday, Wednesday, Thursday, Friday, Saturday); 这些枚举量不能再定义为其他标识符。当用Ord函数分别对其取值时，
