《《Delphi 2005程序设计及其应用开发》-李存斌-电子教案 第2章 Object Pascal程序设计语言》由会员分享，可在线阅读，更多相关《《Delphi 2005程序设计及其应用开发》-李存斌-电子教案 第2章 Object Pascal程序设计语言（54页珍藏版）》请在金锄头文库上搜索。
1、第2章 Object Pascal程序设计语言,本章要点 2.1 基本字符和符号 2.2 常量与变量 2.3 数据类型 2.4 运算符 2.5 语句 2.6 过程与函数 结束,本章要点,常量与变量的定义和使用。 数据类型的概念与使用。 运算符的概念与使用。 Object Pascal语言的语句、过程和函数。,返回本章首页,2.1 基本字符和符号,1Object Pascal的字符集 2特殊字符 3标识符: 用于表示常量（Const）、变量（Var）、类型（Type）、属性（Property）、过程（Procedure）、函数（Function）等语法成分的名称。 4保留字,5指令字 6数字 7
2、标号 8字符串,返回本章首页,表征符：特殊符（Special Symbols），标识符（Identifiers），保留字（Reserved Words），指令字（Directives），数字（Numerals），标号（Lables）和字符串（Character Strings）。 分隔符：空格、程序注释,2.2 常量与变量,常量和变量都是存储数据的载体。在程序执行期间，常量的值不会发生改变，而变量的值则常常随程序的执行而发生变化。 2.2.1 声明常量 2.2.2 声明变量 2.2.3 变量的作用域,返回本章首页,2.2.1 声明常量,1纯常量：是一种预先定义的标识符，其值在定义后永远不会改变
3、。例如： Const Date=31; Pi=3.14159; Name=Peter; 2类型常量：用于保存数组、记录、过程以及指针等类型的值。类型常量不能出现在常量表达式中。声明类型常量的语法规则为： Const Identifer:Type=Value 例如：Const Max:Integer=200;,返回本节,2.2.2 声明变量,变量是程序代码中代表一个内存地址的标识符，而此地址的内存内容在程序代码执行时可以被改变。在所有变量说明以前加上保留字Var。变量说明左边是变量的名称，右边则是该变量的类型，中间用冒号隔开。例： Var Score : Integer; Name : Stri
4、ng; 在声明变量时注意：一是变量名要符合Pascal语言关于标识符的规则；二是必须指定变量的类型，三是尽量使定义的变量或标识符有意义，以便于记忆。例如：用Year，Month，Day来表示年、月、日，比用A，B，C表示要好。 例如：,返回本节,Procedure Tform1.Add1click（Sender：Tobject）; Var X,Y:Integer; Begin X:=30; Y:=70; Edit1.Text:=IntToStr(X+Y); End;,返回,2.2.3 变量的作用域 变量分全局变量和局部变量 ，例如： implementation var FirstString
5、 : string; /全局变量 $R *.nfm procedure TForm1.FormCreate(Sender: TObject); begin FirstString := Hello ; /全局变量可以被内部过程访问 end; procedure TForm1.Edit1Change(Sender: TObject); var AddString : string; /局部变量 begin AddString := Edit1.Text; /局部变量只能在本过程内访问 Label1.Caption := FirstString + AddString; /全局变量可以被内部过程访
6、问 end;,返回本节,2.3 数据类型,2.3.1 简单类型 2.3.2 字符串类型 2.3.3 结构数据类型 2.3.4 变体类型,返回本章首页,2.3.1 简单类型,1有序类型 （1）整数类型；分一般整数类型和基本整数类型两种。 一般整数类型：分Integer和Cardinal ； 基本整数类型：Shortint，Smallint，Longint，Int64，Byte，Word和Longword。详见表2-2 基本整数类型 。 （2）字符类型；分Char，AnsiChar，WideChar （3）布尔类型；（如表2-4所示）； （4）枚举类型；举例说明 （5）子界类型；举例说明 2实数类
7、型：也称浮点类型，包括如下6种： Real48、Single、Double、Extended、Comp、Currency 通常使用的Real和Double类型是等价的。 3 日期时间类型（TDateTime ） 举例说明,返回本节,表2-4 布尔类型,返回,Type Tweek=(Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday); Tcolor=(Red,Yellow,Blue); Var DayOfWeek:Tweek; Hue:Tcolor; 也可以把类型声明和变量声明合二为一，例如： Var DayOfWeek:=(Mon
8、day,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday);,返回,Type THours=023; TValidLetter=AF; Tdays=(Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday); TWorkday= MondayFriday; 上面枚举型的子界型 例： procedure TForm1.Button2Click(Sender: TObject); Type THours=023; var abc:THours; begin abc:=23; EDIT1.Te
9、xt:=IntToStr(abc); end;,返回,在Delphi中，TDateTime的默认数据格式是：yyyy-mm-dd，当然也可以用浮点数来表示。如以下例子中myDate := 35065;与myDate :=1996-1-1; 两个语句是完全等价的。 procedure TForm1.Button1Click(Sender: TObject); Var myDate :TDateTime; begin myDate := 35065; /与myDate :=1996-1-1;等价 ShowMessage( DateToStr(myDate) ); /显示信息1996-1-1 end
10、;,返回,2.3.2 字符串类型,Delphi主要支持三种类型的字符串（详见表2-6 ）： ShortString、AnsiString和WideString ShortString数据类型主要是为了能和Delphi 1.0和Borland Pascal的早期版本兼容。 String既可以是ShorString类型也可以是AnsiString类型，缺省是AnsiString类型。例如： Var S：String；/S Is An AnSiString 编译器会假定你要创建一个AnsiString数据类型变量。 WideString由WideChar字符组成,其功能与AnsiString类似，但
11、在.NET框架下，它是默认的字符串类型,返回本节,2.3.3 结构数据类型,1、集合类型：举例说明 2、数组类型：分一维数组、多维数组、动态数组 举例说明 3、记录类型：举例说明 4、文件类型 5、类类型 6、类引用类型 7、接口类型等,返回本节,在一个按钮的OnClick事件句柄中加入如下语句： procedure TForm1.Button1Click(Sender: TObject);,返回,集合类型举例,/整数型集合 type TLetter=set of Byte; var Letters:TLetter; begin Letters:=22,33,44,55; if StrToIn
12、t(Edit1.Text) in Letters then Label2.Caption:=符合输入 else Label2.Caption:=不符合输入; end;,/字符型集合 type TLetter=set of Char; var Letters:TLetter; begin Letters:=a,e,i,o,u; if Edit1.Text1 in Letters then Label2.Caption:=输入的是元音 else Label2.Caption:=不是元音字母; end;,定义一个二维数组： Type Tmattic=array18,18 of Integer; Va
13、r Mattic: Tmattic; 使用for循环为数组的所有数据赋初值1： Var Col,Row:Integer; for Col:=1 to 8 do for Row:=1 to 8 do MatticCol,Row:=1;,返回,数组类型举例,Type TEmployee=Record Name:String20; EmpNo:Integer; Salary:Double; End; 下面声明记录类型的变量： var Engineer: TEmployee; 下面的语句给整个记录赋值： begin Engineer.Name:=李宁; Engineer.EmpNo:=960344;
14、Engineer.Salary:=8600.00; end;,记录类型举例,procedure TForm1.Button1Click(Sender: TObject); Type TEmployee=Record Name:String20; EmpNo:Integer; Salary:Double; End; /下面声明记录类型的变量： var Engineer: Temployee; /下面的语句给整个记录赋值： begin with Engineer do begin Name:=李宁; EmpNo:=960344; Salary:=8600.00; end; Label1.Capti
15、on:= Engineer.Name; end;,返回,记录类型举例,2.3.4 变体类型,变体类型就是在运算时能动态改变数值的数据类型。例如： var V1, V2, V3: Variant; I : Integer; S : String; Begin V1 :=1; /V1表示整数 V2 := 1234.45; /V2表示实数 V3 := V1+V2; /V3表示实数 V2 := Hello; /V2表示字符串 S= V2; end;,返回本节,2.4 运算符,2.4.1 算术运算符 2.4.2 逻辑运算符 2.4.3 位运算符 2.4.4 关系运算符 2.4.5 运算符的优先级,返回本
16、章首页,2.4.1 算术运算符,算术运算符用于完成二元或一元算术运算。 （见表2-7和表2-8 ）,表2-2 二元运算符,表2-3 一元运算符,返回本节,2.4.2 逻辑运算符,逻辑运算符（见表2-9 ）,表2-9 逻辑运算符,返回本节,2.4.3 位运算符,位运算符可按位级对操作数进行移位、比较等操作。从形式上看，部分位运算符与逻辑运算符是一样的，但它们的操作数类型和返回结果不同。位运算符只能对整型数进行操作，其返回的结果也是整型。位运算符和其操作数以及运算结果的数据类型如表2-10所示。,表2-10 位运算符,返回本节,2.4.4 关系运算符,关系运算符用于比较两个变量的值，表2-11列出了Object Pascal的关系运算符及其运算数类
