对于初学编程这一段其实可以暂时跳过,但是出来混早晚要还的。学了一断时间后,你会发现数据类型很重要,特别是在你分析Delphi源码时

长文预警……

Delphi 中可以定义很多种数据类型,今天条先聊其中比较容易的的简单类型,其中包括:有序数据类型,实数类型和字符串类型。字符串类型比较特殊,等后面单开一篇来进行讲解

delphi自定义数据类型:Delphi基础教程图文版之数据类型(1)

有符号和无符号

在上面的表格中很容易就注意到了这两个词,我自己在初次接触Delphi的时候很疑惑,因为Java中没有这样的概念。貌似只有在C、C 和Delphi中尤其是Win32API中存在大量这样的说法。如果其他语言中也有的话只能抱歉了,我只能说我没接触过……

有符号数(signed)可以表示特定类型规定范围内的整数(包括负数),而无符号数只能表示非负数(0及正数)

在数学中,任意基数的负数都在最前面加上"−"符号来表示。然而在计算机硬件中,数字都以无符号的二进制形式表示,因此需要一种编码负号的方法。当前有四种方法,用于扩展二进制数字系统,来表示有符号数:原码(sign-and-magnitude)、反码(ones' complement)、补码(two's complement)以及移码(offset binary,excess-N)

以上内容摘自维基百科对于有符号数的处理论述:https://zh.wikipedia.org/wiki/有符號數處理

上面说到了关于有符号数的表示方法(即:原码、反码、补码以及移码),我梳理了一下相关内容,以便更容易理解

(1)原码: 一个整数,按照绝对值大小转换成的二进制数,最高为为符号位,称为原码。 加粗为符号位

例如:X=-5

正:0 0000000 00000000 00000000 00000101

负:1 0000000 00000000 00000000 00000101

(2)反码: 将二进制除符号位数按位取反,所得的新二进制数称为原二进制数的反码。 正数的反码为原码,负数的反码是除原码符号位外按位取反,取反操作指:原为1,变0;原为0,变1。

例如:X=-5 原:10000000 00000000 00000000 00000101 反:11111111 11111111 11111111 11111010

即 11111111 11111111 11111111 11111010 为 10000000 00000000 00000000 00000101 的反码。

(3)补码: 反码加1称为补码。 正数的补码和原码相同。负数要得到一个数的补码,先得到反码,然后将反码加上1,所得数称为补码。

例如:X=-5 原:11111111 11111111 11111111 11111010 反:10000000 00000000 00000000 00000101 补:11111111 11111111 11111111 11111011

(4)移码: 实际上就是改变了补码的符号位,从0变1,从1变0。

例如:X=-5 原=1000000 00000000 00000000 00000101 反=1111111 11111111 11111111 11111010 补=‭1111111 11111111 11111111 11111011‬ 移=0111111 11111111 11111111 11111010

有序类型

有序类型是建立在概念“顺序”或“序列”基础上的数据类型。你不仅可比较两个有序值的大小,而且可以求取给定有序值的前驱及后继,或者计算它们的最大或最小值。

布尔类型

布尔值不同于布尔类型,平时很少用到。ByteBool、 WordBool 和LongBool这三种布尔类型的布尔值比较特殊,只在Windows API 函数中才用到它们。

在Delphi 3 中,为了与Visual Basic 和 OLE Automation兼容,修改了ByteBool、 WordBool 和LongBool的布尔值,将TRUE值设置为1,FALSE值仍为0;Boolean类型布尔值保持不变(TRUE为1,FALSE为0)。如果在Delphi 2代码中使用了布尔值显式类型转换 ,那么在以后的Delphi中可能会出错。

实数类型

实数类型(其实也就是我们平时说的小数点)代表不同格式的浮点数。Single类型占的字节数最小,为4个字节;其次是Double 浮点类型,占8个字节;Extended 浮点类型,占10个字节。

这些不同精度的浮点数据类型都与IEEE( 电气和电子工程师协会)标准的浮点数表示法一致,并且 CPU数字协处理器直接支持这些类型,处理速度也最快

需要注意的是Real 类型在Delphi 2 和 Delphi 3 中的定义与 16 位版本一样,都占 6 个字节。不过Borland公司一直不提倡使用这种类型,而建议用Single、 Double、 Extended 类型代替

参考资料:https://www.tcoline.com/resource/Delphi/delphi_datatype.htm

类型转换

其实我认为的类型转换一直都是有两种形式一种是自动类型转换,另一种为强制类型转换

自动类型转换:在有序类型的范围内类型转换的一种形式,即字节数的向字节数的类型内进行转换,编译器可以自动完成类型转换

procedure TForm1.Button1Click(Sender: TObject); var Num:Double; begin Num:=1; end;

强制类型转:即上面自动转换反过来的玩儿法,字节数的向字节数的类型内进行转换,而这种转换编译器是不会帮我们完成,需要我们显示的进行处理

具体的实现方式也有两种,第一种为类型映射(书上是这么称呼的),第二种是利用Delphi的一些内置函数完成

例如:假定要把一个字符类型的值赋给一个byte类型的变量:

var c: char; b: byte; begin c:= 'a'; b:= c; //编译器要提示错误 end.

在下面的代码中,强制类型转换把c转换成byte类型,事实上强制类型转换是告诉编译器你知道你正在做什么,并要把一种类型转换为另一种类型:

var c: char; b: byte; begin c:= 's'; b:= byte(c); //编译器不会报错 end.

如果以字符转字节的方式无法理解的话,那看下面的例子

procedure TForm1.Button1Click(Sender: TObject); var Num:Double; Num2:Integer; begin Num2:=Integer(Num2);//编译器不会报错 end;

使用Delphi内置的函数实现类型转换的方式比较简单,下面是常用函数的一张表

delphi自定义数据类型:Delphi基础教程图文版之数据类型(2)

,