Multidimensional assoziatives array

[FAM]

Hallo Zusammen,

wie implementiert man in Delphi folgendes:

Delphi-Quellcode:

// Level 0
Arr[0, 'Foo', 'Bar1'] := 'Lorem Ipsum';
Arr[0, 'Foo', 'Bar2'] := 'Lorem Ipsum';
Arr[0, 'Foo', 'Bar3'] := 'Lorem Ipsum';

Arr[0, 'Foo1', 'Bar1'] := 'Lorem Ipsum';
Arr[0, 'Foo2', 'Bar2'] := 'Lorem Ipsum';
Arr[0, 'Foo3', 'Bar3'] := 'Lorem Ipsum';

// Level 1
Arr[1, 'Foo', 'Bar1'] := 'Lorem Ipsum';
Arr[1, 'Foo', 'Bar2'] := 'Lorem Ipsum';
Arr[1, 'Foo', 'Bar3'] := 'Lorem Ipsum';

Arr[1, 'Foo1', 'Bar1'] := 'Lorem Ipsum';
Arr[1, 'Foo2', 'Bar2'] := 'Lorem Ipsum';
Arr[1, 'Foo3', 'Bar3'] := 'Lorem Ipsum';

Hatte schon versucht mit verschatelten TStringList zu arbeiten, funzt aber nicht.