delphi经典教程

第2章ObjectPascal语言基础2.1语言成分2.2语句与流程控制2.3定义数据类型2.4构造数据类型2.5过程和函数2.1语言成分2.1.1程序组成2.1.2标准数据类型2.1.3运算符与表达式2.1.4标准函数2.1.5常量与变量2.1.1程序组成程序结构【例2.1】显示程序结构。词汇集基本字符保留字指示字标识符分隔符注释和编译指令注释编译指令Pascal代码书写风格2.1.2标准数据类型什么是数据类型数据类型的分类简单数据类型构造数据类型指针类型2.1.2标准数据类型整数类型实数类型布尔类型字符类型字符串类型2.1.3运算符与表达式运算符算术运算符关系运算符位运算符逻辑运算符运算符的优先级【例2.2】mod运算的用法。(w+1)mod7//明天(w–1+7)mod7//昨天2.1.3运算符与表达式表达式表达式及其运算规则表达式的数据类型布尔表达式中的短路计算书写表达式时的注意事项【例2.3】使用表达式。imod2=0//取值为true时，i为一个偶数，否则为奇数(i=0)and(i=9)//判断i的值是否在0到9之间2.1.4标准函数函数的概念常用标准函数说明调用标准函数【例2.4】使用标准函数。odd(i)//取值为true时，i为一个奇数，否则为偶数chr(ord(ch)+ord('a')-ord('A'))//将ch转换成小写字母2.1.5常量与变量常量直接常量和符号常量常量定义变量变量声明变量初始化变量参与的运算2.2语句与流程控制2.2.1简单语句2.2.2流程控制的概念2.2.3复合语句2.2.4条件语句2.2.5循环语句2.2.1简单语句赋值语句【例2.5】变量赋值。空语句过程调用语句读语句写语句【例2.6】求一个三位数的数字和。【例2.7】判断一个年份是否为闰年。2.2.2流程控制的概念顺序结构分支结构循环结构图2.4不执行与死循环2.2.3复合语句begin语句1;语句2;end2.2.4条件语句if语句if语句的语法格式if布尔表达式then语句1[else语句2]【例2.8】求三个整数中的最大值。复合条件if语句嵌套2.2.4条件语句case语句case表达式of常量1:语句1;常量2:语句2;……[else语句n;]end;【例2.9】计算每月的天数。2.2.5循环语句while语句while语句语法while布尔表达式do语句【例2.10】用while语句求1~10的累加和。while语句循环执行次数问题讨论2.2.5循环语句repeat语句repeat语句语法repeat语句;until布尔表达式;【例2.11】用repeat语句求1~10的累加和。repeat语句循环执行次数问题讨论2.2.5循环语句for语句for语句语法for循环变量:=初值to终值do语句for循环变量:=初值downto终值do语句【例2.12】用for语句求1~10的累加和。for语句循环执行次数问题讨论2.2.5循环语句【例2.13】求一个日期（年月日）对应的是星期几。多重循环【例2.14】求100以内的素数。2.3定义数据类型2.3.1类型定义2.3.2枚举和子界类型2.3.3类型兼容原则2.3.1类型定义type类型=类型描述;例如，typedatatype=integer;arrint=array[1..10]ofinteger;2.3.2枚举和子界类型枚举类型定义枚举类型type枚举类型=(枚举常量{,枚举常量})声明枚举类型变量枚举类型变量能够进行的操作枚举类型变量不能进行的操作子界类型type子界类型=常量1..常量2;2.3.3类型兼容原则类型相同两个数据类型具有完全相同的性质。类型相容两个不同的数据类型具有某些相同的性质赋值相容一种数据类型的值可以通过赋值操作赋给另一种数据类型的变量。2.4构造数据类型2.4.1数组类型2.4.2字符串类型2.4.3集合类型2.4.4记录类型2.4.5文件类型2.4.6指针类型2.4.1数组类型一维数组定义一维数组类型type数组类型=array[下标类型]of元素类型;声明一维数组变量数组声明时可赋初值数组元素的引用格式数组元素的运算获得数组下标的上界和下界两个数组变量间的赋值运算【例2.15】用一维数组计算Fibonacci序列值。Fibonacci序列是指首两项为0、1，以后各项的值是其前两项值之和的序列：{0，1，1，2，3，5，8，……}其数学中的递推定义为：2.二维数组【例2.16】显示螺旋方阵。3.动态数组vara:arrayofinteger;SetLength(a,5);4.不规则的多维数组【例2.18】使用动态数组输出杨辉三角。2.4.2字符串类型3种字符串类型字符串元素的运算字符串变量的运算用于字符串运算的标准过程和函数【例2.19】判断回文字符串。2.4.3集合类型集合类型的定义type集合类型=setof元素类型;集合类型的值集合类型的运算赋值运算关系运算属于运算集合运算【例2.20】“筛选法”求素数。2.4.4记录类型记录类型与变量对记录变量中的域进行操作对记录变量进行赋值操作【例2.21】使用记录类型表示复数。开域语句type记录类型=record域1:类型1;域2:类型2;……end;5.记录数组vargroup:array[1..50]ofstudent;2.4.5文件类型文件类型是一种构造数据类型，根据文件中数据元素的数据类型，可将文件类型分为3种：文本文件、类型文件和无类型文件。对不同类型的文件所进行的操作也有所差别。文件类型的定义语法和使用方法详见9.3节。2.4.6指针类型变量所占用存储单元的静态分配与动态分配静态变量和动态变量声明指针变量指针所指向的变量对指针变量的操作使用标准过程new与dispose动态生成或撤销变量指针指向数组和记录使用指针构成链表2.5过程和函数2.5.1过程的声明与调用2.5.2函数的声明与调用2.5.3变量的作用域2.5.4参数传递2.5.5过程/函数中参数的类型兼容原则2.5.6过程/函数的重载2.5.7递归的过程与函数2.5.1过程的声明与调用过程声明procedure过程[(参数列表)];//过程首部局部声明部分;//过程声明部分begin//语句体语句;end;//此处以分号结束过程调用过程[(参数{,参数})]2.5.2函数的声明与调用函数声明function函数[(参数列表)]:类型;//函数首部局部声明部分;//函数声明部分begin//语句体语句;end;函数怎样返回值fact:=10;//为函数名赋值，返回结果result:=10//为result变量赋值，返回结果函数调用函数过程[(参数{,参数})]【例2.22】计算阶乘并显示计算公式。2.5.3变量的作用域全局变量局部变量【例2.23】求100以内的Smith数。2.5.4参数传递参数声明值参数变量参数常量参数输出参数参数默认值【例2.24】求500以内的亲密数对。2.5.5过程/函数中参数的类型兼容原则参数传递的类型兼容原则形式参数的类型声明限制函数返回值的类型限制2.5.6过程/函数的重载functionMax(A,B:Integer):Integer;overload;functionMax(A,B:Int64):Int64;overload;重载的多个过程/函数之间必须满足以下两点：参数必须不同，即以不同的参数个数或参数类型来区别重载的过程/函数。返回值可以相同，也可以不同，即不能以不同的返回值来区别重载的过程/函数。2.5.7递归的过程与函数【例2.25】使用递归函数计算阶乘。实验2ObjectPascal语言程序设计基础训练金额的中文大写方式求解约瑟夫环问题__第3章Windows应用程序界面设计3.1可视化编程基础3.2窗体Form3.3文本显示与编辑控件3.4按钮3.5选项按钮3.6列表框3.7界面布局3.8定时器Timer3.1可视化编程基础3.1.1面向对象基本概念3.1.2定义类和使用对象3.1.3对象的属性、方法和事件3.1.4事件驱动的Delphi应用程序3.1.5组件概述3.1.1面向对象基本概念类与对象类对象类的封装性、继承性和多态性类的封装性类的继承性类的多态性3.1.2定义类和使用对象定义类定义子类type类=class(父类)数据域声明;方法声明首部;end;3.使用对象声明对象varForm1:TForm1;对象实例化Application.CreateForm(TForm1,Form1);引用对象中的数据域和调用对象的方法对象.数据域对象.方法(实际参数表)释放对象aday.Free;4.self指代对象自身procedureTForm1.FormCreate(Sender:TObject);beginself.Caption:=self.Caption+‘演示程序’;end;15324(a)初始化计数起点15304(b)2出环后15300(c)4出环后05300(d)1出环后00300(e)5出环后5.as和is运算符SenderasTButton//将Sender对象转换为一个TButton类的对象SenderisTComponent//判断Sender是否属于TComponent类及其子类3.1.3对象的属性、方法和事件对象的属性属性的读写特性：可读写属性和只读属性属性的作用时间：设计时属性和运行时属性引用对象属性对象.属性对象的方法对象的事件3.1.4事件驱动的Delphi应用程序组件的事件由消息触发Delphi应用程序由事件驱动procedureTForm1.Button1Click(Sender:TObject);begin//事件处理程序end;3.1.5组件概述组件组件分类控件窗口控件是能够获得输入焦点的控件。图形控件是不能获得输入焦点的控件。非可视组件查看组件的属性、方法、事件及其类层次图3.1组件类图3.2窗体Form3.2.1窗口与窗体3.2.2窗体的属性、方法和事件3.2.1窗口与窗体1.Windows窗口2.Delphi窗体3.2.2窗体的属性、方法和事件窗体的主要属性Name窗体对象名Caption窗体标题Left与Top窗体位置，左上角在屏幕的坐标Height与Width窗体的高度与宽度Color窗体工作区的背景颜色Enabled窗体的有效性Visible窗体的可视性Icon窗体标题上的小图标Font窗体的字体Position窗体运行时的初始位置WindowState窗体运行时的初始状态2.窗体的主要方法Close关闭窗口Create创建并初始化一个窗口对象Hide隐藏窗口SetFocus使窗口获得焦点SetFocusedControl使窗口上的控件获得焦点Show显示被隐藏的窗口3.窗体的主要事件OnCreate和OnDestroy事件OnShow和OnHide事件OnActivate和OnDeactivate事件OnClick和OnDblClick事件OnPaint事件OnCanResize和OnResize事件OnCloseQuery和OnClose事件4.窗体事件的触发次序创建窗口时由用户操作触发的事件关闭窗口时【例3.1】理解窗体的事件。新建应用程序添加组件Label编写窗体OnCreate事件处理程序窗体OnCanResize和OnResize事件处理程序3.3文本显示与编辑控件3.3.1标签Label3.3.2单行编辑框Edit3.3.3格