Delphi-Quellcode:
test1 : array[0..0,3..3,7..7,9..9] of Integer; // 2 Statische array für gerade und ungerade
test2 : Array[2..2,4..4,6..6,8..8] of integer;
... und Du bist Dir sicher, dass Du ein 4 dimensionales Array benötigst?
Oder meintest Du vielleicht so etwas?
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
key : array [0..8] of integer;
test1 : array [0..8] of integer;
begin
key[1]:= test1[random(3)];
end;
0: key[i] := (test1[random(3)]);//W
Was Du tust ist ein 3 dimensionales Array zurückgeben.
Du belegest ein index des 4 dimen. Array und erhälst ein 3 dimens. Array
als Rückgabe. Das ist nicht mit Integer kompatibel.
Grüße
Klaus