有关pascal的填充语句小技巧

背景

今天打代码，用了一次fillchar(a,sizeof(a),1);

结果a数组(of longint)所赋的值却不是1

探索

···pascal

program fillchartest;

var f:array[1..100]of Longint;

begin

fillchar(f,sizeof(f),1);

writeln(f[1]);

end.

···

以上一段代码，输出结果为

16843009

转换为2进制，发现其结果为0000 0001 0000 0001 0000 0001 0000 0001

那么，fillchar的用法到底如何？

显然，fillchar的赋值方式，是一段空间中，八位八位地重复赋值

扩展

其实还有一些语句，有着不同的用途

fillword

赋的值是双字节整数

如：fillchar(a,sizeof(a) div 2,32767)

filldword

所赋值是四字节的

如：filldword(a,sizeof(a) div 4,2147483647)

fillbyte

给元素类型为byte的数组赋值

至于fillbyte和fillchar的区别如何，这里先填个坑