Hi.
Delphi-Quellcode:
begin
SetLength(Knoten, Pred(LZahl));
for Y := 0 to Pred(LZahl) do
begin
for X := 0 to Pred (LZahl) do
begin
Knoten[X + (Lzahl * Y)] := TKnoten.Start;
Die Dimensionierung steht in keinem Verhältnis zu den von dir verwendeten Indexwerten.
Grüße vom marabu