Mehrdimensionaler Array wie in PHP möglich?

[DeddyH]

Man kann auch solche Konstrukte verwenden, solange man die Übersicht behält (was nicht immer ganz einfach ist):

Delphi-Quellcode:

type
  TKategorie = (Punkte,Siege,verloren);
  TKatArray = array[TKategorie] of integer;
  TDynArray = array of TKatArray;


procedure TfrmTest.FormCreate(Sender: TObject);
var Arr: TDynArray;
    i: integer;
begin
  SetLength(Arr,2);
  Arr[0][Punkte] := 1;
  Arr[0][Siege] := 0;
  Arr[0][verloren] := 0;
  Arr[1][Punkte] := 3;
  Arr[1][Siege] := 1;
  Arr[1][verloren] := 0;
  for i := Low(Arr) to High(Arr) do
    ShowMessage(Format('Punkte: %d, Siege: %d, verloren: %d',[Arr[i][punkte],Arr[i][Siege],Arr[i][verloren]]));
  SetLength(Arr,0);
end;