Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Fehler: Unkontrollierter Übertrag von Daten in ein Array
25. Okt 2011, 14:28
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;
Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|
|
Zitat
|