Delphi 入门与提高

《Delphi 入门与提高》由会员分享，可在线阅读，更多相关《Delphi 入门与提高（46页珍藏版）》请在金锄头文库上搜索。

1、Delphi 入门与提高Delphi 基础知识为什么选择 Delphin可视化编程，方便易学n组件众多、编程效率高n建立在BDE上的数据库连结n功能强大的调试器n独立执行的应用，不需要运行库一个简单的例程procedure TForm1.Button1.Click(Sender: TObject); beginLabel2.Caption := 嗨！ + Edti1.Text + ,欢迎来到Delphi 的世界！; end; procedure TForm1。Button2.Click(Sender: TObject); beginClose; end;Object Pascaln常量和变量n

2、数据类型n语句n过程和函数n程序结构常量和变量n常量n变量n类型常量常量n常量是在程序中多 次引用的固定量的 名字。它的值在程 序执行期间保持不 变，一般也不能改 变。n常量的值可以是简 单的一个数、一条 字符串，也可以是 其他常量的计算结 果 n语法：const 常量名 = 常量 值 n示例：const CITY = 南京;GreatCity = CITY + 是一座历史悠久 的 城市; 变量n变量是一个特定数 据实体，它有预定 义的数据类型，并 且可在内存中某个 唯一地址存放指定 类型的值。n变量可在程序运行 的过程中动态的修 改。n变量有四个属性： 名称、类型、变量 值和占用的内存地 址

3、。n语法 var 变量名1, ,变量 名n: 类型;n示例 var iMyAge: Integer; sCityName: String; 类型常量n类型常量不是常量 ！缺省的情况下， 它是静态变量。n只有当设置 Assigned typed constants属性为否 ，或者添加$J-时 ，类型常量的值才 不可以改变。 n语法const 类型常量名: 类型 = 值; n示例const MyAge: Integer = 23;数据类型n整数n实数n布尔数n字符串n集合n数组n指针n整数类型类型范围 状态字节 数 Integer -231231-1有符号4 Cardinal0232-1 无符号4

4、 ShortInt -128127 有符号1Int64-263263-1 有符号 8 Byte 0255 无符号 2 Word 065535 无符号 4实数类型（浮点数）类型范围字节数 有效位数 Real 5.010-3241.7103088 1516 Single1.510-45 3.41038 478 Double5.010-324 1.710308 81516 Extended3.610-4951 1.7104932 101920 Currency-922337203685477.5808 922337203685477.5807 81920 数值类型的运算n算术运算 n整数：+、-、*

5、、/、div（整除）、mod（取余） 。注意“/”运算符所的结果为实数 n实数：+、-、*、/ n逻辑运算 n、 、 = n位运算 nnot、 and、 or、 xor、 shl、 shr （位运算只能 对整数进行操作 ）数值运算的溢出n整数溢出 n除0（EZeroDivide）n上溢（EOverFlow） n下溢（EUnderFlow） 布尔类型 nBoolean类型只有两个值：TRUE和 FALSE。n布尔变量支持三中逻辑运算：not、and 和or 字符类型类型字符集 字节数 AnsiCharSBCS,MBCS1WideCharUnicode2Char等价于AnsiChar1Pascal

6、 字符串类型 最多字符 字节数 字符集 ShortString 2552256ANSI向后兼容 AnsiString23142G BANSI (SBCS,MBCS) LongString 23142G BANSI (SBCS,MBCS) WidString23042G BUnicode*字符串类型String实际上声明的是AnsiString类型 Null 字符串类型 说明PCharNull 式字符串，ANSI字符，向后 兼容 PAnsiCharNull 式字符串，ANSI（SBCS， MBCS） PWideChar Null 式字符串，Unicode字符集PString指向String的指针

7、Pointer无类型指针，可以指向任何类型字符与字符串n声明 var ch: Char （字符）s: String（Pascal字符串）p: PChar （Null字符串）Name: Array 010 of Charn转换 p := PChar(s);s := String(p); ch := p1;ch := s1;枚举、子域和集合n枚举：TFontStyle = (fsBold, fsItalic, fsUnderline, fsStrikeOut); n子域：TMyNumber = 1100;n集合：集合类型名 = set of 元素类型 TFontStyles = set of TF

8、ontStyle; TCharSet = set of Char数组n一维静态数组 数据类型名称 = Array 下标定义 of 类型名称 n数组的引用 数组名称下标n动态数组的长度设 定 SetLength(数组名 称)ntype TIntArr = Array 099 of Integer; var MyIntArr: TIntArr 或者 var MyIntArr: Array 099 of Integer;nMyIntArr0 := 10;指针类型n指针存放的并不是真 正的数据，而是数据 在内存中的地址n指针的值为nil时，代 表它没有指向任何数 据n指针也有类型，不经 过强制类型转换

9、，指 针不能指向和自己类 型不同的变量。nPointer类型的指针可 以指向任何变量nvar p: Pointer; pInt: Integer; iWidth: Integer;niWidth := 30; pInt := iWidth; iWidth := pInt + 1;语句n表达式n赋值语句n复合语句n条件语句n循环语句表达式以及操作符优先级 表达式是由操作符和操作数组成的 操作符有以下优先级操作符优先 级 类别 not1单目运算* / div mod shl shr and2乘法运算 + - or xor3加法运算 = = iMax thencontinue;Inc(iCount)

10、; endnrepeatif not Assigned(p) thenbreak; until p.Width 10过程和函数n过程和函数统称子程序，都是指一段在 程序中被调用的代码。n对于编程者来说，过程和函数主要的不 同之处在于函数有返回值，而过程没有 。 过程和函数的实现nprocedure 过程名称(参数表); 局部声明块; begin 可执行语句; end;nfunction 函数名称(参数表): 返回值类型; 局部声明块 begin 可执行语句; Result := 函数返回值 end;子程序的参数n子程序名(修饰词1 参数1: 类型1;修饰词n 参 数n: 类型n)n如果几个参数

11、修饰词和类型相同（包括都没有修饰 词），可以将它们合并到一起 ;修饰词m 参数m, 参数m+1: 类型m;n类型为数组时，不能带有数组的长度。 procedure DoProc(IntArr: Array099 of Integer); procedure DoProc(IntArr: Array of Integer); 实际参数和形式参数n实参：调用子程序时，传递给子程序的 参数 dReal := GetRealValue(x);n形参：子程序实现部分所定义的参数 function GetRealValue(Value: Double): Double参数的修饰词n无修饰词：数值参数，相当

12、于函数的局 部变量，可以改变，但不影响实参nconst：常量参数，相当于函数的常量 ，不能改变nvar：变量参数，相当于函数的局部变 量，可以改变，并且影响实参nout：外部参数，和变量参数类似，但 不提供输入信息。Object Pascal 常用过程与函数n字符串处理 IntToStr, UpperCase, Copy n数学计算 Sin, MaxIntValue, Round, Random n输入输出 WriteLn, Read 程序结构n工程组n工程n单元工程program Project1; usesForms,Unit1 in Unit1.pas Form1; $R *.RES b

13、eginApplication.Initialize;Application.CreateForm(TForm1, Form1);Application.Run; end.单元unit Unit2; interface usesWindows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs; typeTForm2 = class(TForm)Button1: TButton;procedure Button1Click(Sender: TObject);privatepublicend; varForm2: TF

14、orm2; implementation $R *.DFM procedure TForm2.Button1Click(Sender: TObject); beginClose end; end.单元的结构nInterface 接口部分 只有这里的声明才能被别的单元使用nImplementation 实现部分 各子程序的具体实现nInitialization 初始化部分nFinalization 终结部分uses 字句：相当于引用其余单元的声明变量的作用域和生存期变量在何处声 明作用域生存期单元的Interface 部分变量所在的单 元及引用该单 元的所有单元和程序相同单元的 Implementation 部分变量所在的单 元和程序相同过程或函数内 部变量所在的过 程或函数仅当过程或函 数被执行时小结nDelphi 的特点nObject Pascal 语言基础n常量和变量n数据类型n语句n过程和函数n程序结构上机题目n显示一个数字序列，如下： 1, 3, 5, , 19n显示杨辉三角形 1 1 1 1 2 1 1 3 3 1