Das hier sollte dir helfen:
Delphi-Quellcode:
type
MyArray = Array of Integer;
..
procedure TForm1.Button1Click(Sender: TObject);
var
myArray: TMyArray;
begin
SetLength(myArray, 3);
end;
procedure TForm1.hakapuka(var arr: TMyArray);
begin
SetLength(arr, 5);
end;
Übrigens, toller Prozedurenname