delphi教学笔记

《MasteringDelphi6》学习笔记之五

《Mastering Delphi 6》 学习笔记之五

在某个类中用protected声明的变量，在本单元之外是不能够随意访问的（通过声明子类才可以访问其protected域）。《Mastering

Delphi 6》中提到了一个不常用的技巧：

// Unit2

type TTest = class

protected

protectedVar : integer;

end;

// Unit1

type

TFake = class(TTest);

procedure TForm1.FormCreate(Sender:TObject);

var

Test : TTest;

begin

Test := TTest.Create;

// Test.protectedVar := 1; // not work!

TFake(Test).protectedVar := 1; // This works!

Test.Free;

end;

当然了，你也可以向TFake添加代码来实现同样的功能，但是上述方法的好处在于只需要一个占位符，而不需要为修改一个变量而大动干戈的派生一个类。在实际中这个技巧很少会用到，不过既然作者提到了，还是记以备考.

用来声明虚拟函数的关键字，在C++中只要一个virtual就可以了，不论是在基类还是派生类中。但是在Delphi中，一定要记住：在基类中使用virtual，在派生类中使用override。如果忘记了这一点的话，会导致两个后果：

1．编译程序的时候会得到一个“Method ‘XXX’hides the

virtual method of base type ‘XXX’”（尽管程序还可以运行）；

2．多态机制将无法正常工作。例如，

type

TAnimal=class

procedure Voice;virtual;

end;

Delphi7.0的常用函数与过程

2.1.4 Delphi 7中的运算符与表达式

Delphi 7 有 8 类运算符，本章主要学习算术运算符、字符串运算符和位运算符。其他运

算符将在以后的章节中学习。

1．算术运算符

算术运算符是用户最熟悉的，类似算术中的加减乘除等。Delphi 7中有8个算术运算符，

具体含义如下。

（1）取正运算符“+” ：单目运算符，表示对一个数值型数据取正，例如+5的值为5。另

外，取正运算符可以省略。

（2）取负运算符“-” ：也是单目运算符。例如对5取负，其值为-5。

（3）加法运算符“+” ：与数学上的加法相同。加法运算符与取正运算符符号相同，但含

义不同。例如3+5的值为8。

（4）减法运算符“-” ：与数学上的减法含义相同。也请注意减法运算符与取负运算符的

异同。

（5）乘法运算符“*” ：表示对两个数值型数据相乘，与数学中的乘法相同。例如：3*5

的值为15。

（6）除法运算符“/” ：与数学上的除法含义相同。例如 3/5 的值为“0.6” 。另外，除法

运算的结果总是实型数据。

（7）整除运算符“div” ：只能对两个整数进行除法运算，结果为整型数据。例如5 div 3

的值为1，而“5 div 2.0”是不合法的。

（8）取余运算符“mod” ：对两个整数相除，结果为余数。例如5 mod 3的值为2。

1，数学类函数包括绝对值函数，取整数函数，取小数函数，平方函数，平方根函数，三角函数，指数函数，对数函数和随机函数等。

（1）绝对值函数：Abs(x) 返回x的绝对值，x是整型或实型数据

例：x := Abs(-1); //这是一个赋值语句，先计算赋值号右边函数的值（为1）再赋给x.

(2)取整数函数

例：

Trunc(x):Int64;

Round(x):Int64;

Int(x):Extended;

x1 := Trunc(-2.5); //赋值语句，函数值-2

Delphi面向对象编程 读书笔记

<>读书笔记之一

<1> Delphi中类的声明语法如下:

type 类名 = class(基类名)

{数据成员声明}

{过程和函数声明}

{属性声明}

end;

Example:

type

TMan=class

private

FAge:Integer;

procedure SetAge(Value:Integer);

public

Language:string;

Married:Boolean;

Name:string;

SkinColor:string;

constructor Create;overload;

class procedure Sing; //唱国歌

property Age:Integer read FAge write SetAge;

procedure SayHello(words:string);

end;

<2> 对象构建

Delphi中的类默认都是从TObject类继承而来,对象的创建必须调用构造函数

Delphi中的对象分配存储空间都是在堆上,这点和C++不同,C++是可以在栈上分配对象的

Example:

procedure TForm1.Button1Click(Sender: TObject);

var

APerson:TMan;

begin

APerson:=TMan.Create;

end;

为什么可以采用TMan.Create这种形式来调用Create方法呢,因为Create前面有constructor 关键字

constructor 相当于将Create声明为Class方法[相当于C++中 static方法]

<3> 刘老师在书上的解释如下

Delphi笔记

Delphi笔记-ObjectPascal的相关内容

Delphi学习笔记2007-12-08 21:15:51 阅读121 评论0 字号：大中小订阅

Pascal有3种字符串类型：

1.ShortString

该类型的字符串的最大长度为255个字符。所占的内存中的第一个字节地址中存放字符

串的长度信息。每个字符占一个字节的空间。它所占的内存是静态分配的。

2.AnsiString

是一种动态分配内存的字符串类型，最大长度为2的31次幂个字符，占2GB的内存空间。它的变量是一个占4B内存的指针,指向动态内存。每个字符占一个字节。

3.WideString

也是一种动态分配内存的字符串类型，最大长度比AnsiString小一个字符。它的效率

比AnsiString差。每个字符占两个字节。

内存分配和释放函数：

AllocMem() FreeMem()

GlobalAlloc() GlobalFree()

GetMem() FreeMem()

New() Dispose()

StrAlloc() StrDsipose()

StrNew() StrDispose()

VirtualAlloc() VirtualFree()

SetLength()

函数和过程的重载要用关键字overload,类的函数和过程的覆盖要用override。它们的区别是：重载的多个函数具有相同的函数名，不同的参数列表；覆盖用在父类与子类之间，

子类的同名函数覆盖父类的同名虚函数或动态函数。

数据类型表：

8位有符号整数：ShortInt

8位无符号整数：Byte

16位有符号整数：SmallInt

16位无符号整数：Word

32位有符号整数：Integer,LongInt

32位无符号整数：LongWord,Cardinal

64位有符号整数：Int64

4字节浮点数：Single

6字节浮点数：Real48