在Delphi中,动态数组是一种灵活的数据结构,可以根据需要动态地分配和释放内存空间。定义和使用动态数组的步骤如下:
定义动态数组变量:在程序的变量区声明一个动态数组变量。例如,声明一个整数类型的动态数组变量arr:var arr: array of Integer;
分配内存空间:使用SetLength函数为动态数组分配内存空间。例如,为arr分配10个元素的内存空间:SetLength(arr, 10);
使用动态数组:可以像使用静态数组一样使用动态数组。例如,为arr的第一个元素赋值为1:arr[0] := 1;
动态调整数组大小:使用SetLength函数可以动态调整数组的大小。例如,将arr的大小调整为20个元素:SetLength(arr, 20);
释放内存空间:使用SetLength函数可以释放数组变量占用的内存空间。例如,释放arr的内存空间:SetLength(arr, 0);
下面是一个完整的示例代码:
program DynamicArrayExample;
var
arr: array of Integer;
i: Integer;
begin
// 分配内存空间
SetLength(arr, 10);
// 使用动态数组
for i := 0 to 9 do
arr[i] := i + 1;
// 输出动态数组的元素
for i := 0 to 9 do
WriteLn(arr[i]);
// 调整数组大小
SetLength(arr, 20);
// 释放内存空间
SetLength(arr, 0);
end.
以上代码定义了一个名为arr的整数类型的动态数组变量,分配了10个元素的内存空间,使用循环为数组赋值,并通过循环输出数组的元素。然后调整数组大小为20个元素,并最后释放了数组的内存空间。