想请问动态字符数组不能用 setlength 设置长度吗

程序：
var
a:array[0..1023] of Byte;
b:array[0..1023] of Char;
c:array of Byte;
d:array of Char;
begin
writeln(SizeOf(a));
writeln(SizeOf(b));
writeln(SizeOf(c));
setlength(c,1024);
writeln(SizeOf(c));
writeln(SizeOf(d));
setlength(d,1024);
writeln(SizeOf(d));
end.
输出：
1024
1024
4
4
4
4
编译器版本：Free Pascal Compiler version 3.2.2 [2021/05/15] for i386
虽然Wiki上有提及字符数组是旧时代的产物了，但好像没有提及长度固定这一点？

对动态数组取 sizeOf 返回的是指针的开销

以下内容粗译自 https://wiki.freepascal.org/SizeOf （英文页面）
编译时函数 SizeOf 求得给定数据类型或变量标识符的字节大小。
它既可出现在编译时表达式，也可出现在编译指令之中。
……
动态数组相关
由于动态数组被实现为指向堆块的指针，SizeOf 求得的是该指针的大小。为了求得数组中数据的大小，SizeOf 应该和 length 函数一起使用。

也就是说，要想得知（静态或动态）数组元素的数量，应该用 length 而不是 SizeOf
程序：
var
c:array of Byte; //Char类型会得到一样的输出
begin
writeln(length(c)); //由于未初始化，在编译时会得到警告
setlength(c,1024);
writeln(length(c));
end.
输出：
0
1024

当时由于急着想让程序跑起来，没有对这个问题作进一步思考
更常见的情况是，API Call时一般会被要求提供以字节计的数组大小
此时无论是静态数组或者动态数组a，都可以用单个元素的字节大小*元素个数来计算
也就是Length(a)*SizeOf(a[0])来求得数组大小
虽然有过度优化的嫌疑，但用上述方式而非只用SizeOf(a)，可以防止未来将静态数组改为动态数组时出错

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

6回复贴，共1页

<<返回pascal吧

分享到:

日	一	二	三	四	五	六