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