Setlength, mehrdimensionales Array?

[StefanDP]

Zitat von toms:

Hi,

Ein Beispiel:

Delphi-Quellcode:

var
  multiArray  : array of array of Word;
  i, j : Integer;
begin
  // Länge des mehrdimensionalen Array setzen:
  SetLength(multiArray, 2, 3);

  // Array auffüllen mit Werten:
  for i := 0 to 1 do
    for j := 0 to 2 do
    begin
      multiArray[i,j] := i + j // Irgend eine Integer Zahl zuweisen
    end;
end;

"optimiert":

Delphi-Quellcode:

var
  multiArray  : array of array of Word;
  i, j : Integer;
begin
  // Länge des mehrdimensionalen Array setzen:
  SetLength(multiArray, 2, 3);

  // Array auffüllen mit Werten:
  for i := Low(multiArray) to High(multiArray) do
    for j := Low(multiArray[i]) to High(multiArray[j]) do
    begin
      multiArray[i,j] := i + j // Irgend eine Integer Zahl zuweisen
    end;
end;