在Delphi中，可以使用動態數組的SetLength函數來分配數組的內存空間，并使用索引來賦值。以下是一個示例：
var
myArray: array of Integer;
i: Integer;
begin
SetLength(myArray, 5); // 分配數組的內存空間
for i := 0 to High(myArray) do // 使用索引循環賦值
begin
myArray[i] := i + 1;
end;
// 輸出數組的值
for i := 0 to High(myArray) do
begin
WriteLn(myArray[i]);
end;
end;
輸出結果為：
1
2
3
4
5
在上述示例中，我們首先使用SetLength函數分配了一個長度為5的動態數組myArray的內存空間。然后，使用for循環和索引i循環遍歷數組，并將i + 1的值賦給數組的每個元素。最后，我們再次使用for循環遍歷數組，并輸出每個元素的值。
