verschachtelte dynamische arrays initialisieren

[Kolonius]

Hallo Community,
ich stolpere über die Initialisierung von folgender Struktur:

Delphi-Quellcode:

Type
      korbinhalt = record
         daten: array of 0..1;
         diff: integer;
      end;
      Korbmenge = Array of korbinhalt;

var km: korbmenge;
    mdaten: integer;

procedure TForm1.Button1Click(Sender: TObject);
// init
var n,k,sum0, anzahl, sda:integer;
    s1,s2:string;
begin
  anzahl:=strtoint(edit1.Text);
  mdaten:=strtoint(edit2.Text);
  setlength(???,mdaten); // bezieht sich auf "daten" oben im Record
  setlength(km,anzahl);

Alle Kombinationen, die ich probiert habe, bringen Compilerfehler. Die Variable kann ich aber mit: km[n].daten[k]:=random(2); fehlerfrei adressieren.
Ich bitte um Hilfe.

Gruß Kolonius