Fehler: Unkontrollierter Übertrag von Daten in ein Array

[Bummi]

dann müsste der Zugriff folgendermaßen funktionieren ...

Delphi-Quellcode:

var
  col,row:Integer;
  s:String;
begin
  SetLength(Rows,10,10);
  For col := Low(Rows) to High(Rows) do
    For Row := Low(Rows[col]) to High(Rows[col]) do Rows[col,row] := IntToStr(col) + '_'+IntToStr(row);

  For col := Low(Rows) to High(Rows) do
    For Row := Low(Rows[col]) to High(Rows[col]) do
      begin
        if Row=High(Rows[col]) then s := s + Rows[Col,Row] + #13#10 else  s := s + Rows[Col,Row] + ','
      end;
  Showmessage(s);
end;

[DeddyH]

Hatte ich das nicht bereits so ähnlich geschrieben?

[Bummi]

@DeddyH

jepp, sorry, habe die #10 gerade erst gesehen ....

[p80286]

Schön, daß mal jemand das SetLength explizit nutzt, bleibt die Frage ob Ykcim es auch nutzt??

Gruß
K-H

[DeddyH]

Aber wenn, dann außerhalb der gezeigten Routine, schließlich sind das Var-Parameter. Wäre ja blöde, wenn die anders wieder rauskommen, als sie reingekommen sind

[p80286]

Ich glaube sowas ähnliches ist da passiert.
Er wäre nicht der Erste der sich seine dyn. Datenstrukturen zerschießt.

Gruß
K-H

[DeddyH]

Also sagen wir den Standardsatz: "Zeichma mehr Kot"