Fillchar是Turbo/Borland Pascal的System单元的一个标准过程，它的使用格式是：FillChar(var X; Count: Word; Value)，它的功能是，把指定变量X在内存段中所占的低Count个字节赋为相同的值Value， 其中Value是填充的值，只能是Byte、Char或Boolean等单字节类型的值。在Free Pascal中稍加扩展为FillChar(var X; Count: Longint; Value), 功能没变。
[例1]： Fillchar通常用来给数据赋初值。
var a:array [1..10] of arrtype;执行
fillchar(a,sizeof(a),0);
当arrtype为
- real(其他实数类型差不多)
- integer(byte,word,longint,shortint都相同)
- boolean
- char
- 使得a中的元素全部成为0.0
- 全部为0
- 全部为false
- 全部为#0
这里使用了函数sizeof(a)，其功能是返回变量a所占的总字节数，如上例返回：
当arrtype为
- real sizeof(a)的值为60（每个元素占6个字节，10个元素共占60个字节）
- single sizeof(a)的值为40（每个元素占4个字节，10个元素共占40个字节）
- double sizeof(a)的值为80（每个元素占8个字节，10个元素共占80个字节）
- extended sizeof(a)的值为100（每个元素占10个字节，10个元素共占100个字节）
- comp sizeof(a)的值为80（每个元素占8个字节，10个元素共占80个字节）
- integer(word) sizeof(a)的值为20 （每个元素占2个字节，10个元素共占20个字节）
- byte (shortint) sizeof(a)的值为10 （每个元素占1个字节，10个元素共占10个字节）
- longint sizeof(a)的值为40 （每个元素占4个字节，10个元素共占40个字节）
- boolean sizeof(a)的值为10（每个元素占1个字节，10个元素共占10个字节）
- char sizeof(a)的值为10 （每个元素占1个字节，10个元素共占10个字节）
所以例1的结果就是将数组a的所有元素（全部字节）用0来填充，要注意对不同类型的数据而言，对“0”的“解释”是截然不同的！对整型或实型量来讲，所有字节均为0，则该量也为0；对boolean型量（一个字节）来讲，0表示false（非0数表示true），则该量为false；对char型量（一个字节）来讲，0表示ASCII码值为0的字符，则该量为#0。
Read More...