在 Delphi 中，可以使用 SetLength 函数来初始化数组，并使用索引对数组进行赋值。
示例代码如下：
var
myArray: array of Integer;
i: Integer;
begin
// 初始化数组，设置数组长度为 10
SetLength(myArray, 10);
// 使用索引对数组元素赋值
for i := 0 to Length(myArray) - 1 do
begin
myArray[i] := i;
end;
// 打印数组元素
for i := 0 to Length(myArray) - 1 do
begin
WriteLn(myArray[i]);
end;
end;
在上述示例中，首先使用 SetLength 函数初始化了一个长度为 10 的整数数组 myArray。然后使用 for 循环和索引 i 对数组元素进行赋值，赋值为索引 i 的值。最后使用 for 循环打印了数组的元素。
希望可以帮助到您！
