Mehrmeninsionales Array mit Extenden und Boolean werten

[WoTo]

Hallo,

vielleicht so in etwa:

Delphi-Quellcode:

type
  rWert = record
            Wert : integer;
            Belegt : boolean;
          end;

var
  arWert  : Array (0..7) of rWert;

begin
  arWert[1].Wert := 1;
  arWert[1].Belegt := true;
usw.
end.

Ist nicht getestet, nur einfach heruntergeschrieben. Sollte nur eine Idee aufzeigen.

Gruß,
Woto