Einzelnen Beitrag anzeigen

Hawkeye219

Registriert seit: 18. Feb 2006
Ort: Stolberg
2.227 Beiträge
 
Delphi 2010 Professional
 
#7

Re: dynamisches mehrdimensionales Array durchlaufen

  Alt 21. Dez 2007, 12:01
Hallo,

ein Zugriff auf Arraydaten ist im BDS mit der FOR..IN-Schleife möglich, wenn man das Array geeignet vereinbart:

Delphi-Quellcode:
type
  TDynVector = array of Integer;
  TDynMatrix = array of TDynVector;
var
  Vector : TDynVector;
  Matrix : TDynMatrix;
  row, col : Integer;
  Value : Integer;
begin
  SetLength (Matrix, 4, 8);

  for row := 0 to High(Matrix) do
    for col := 0 to High(Matrix[row]) do
      Matrix[row, col] := 100 * row + col;

  for Vector in Matrix do
    for Value in Vector do
      // Value enthält jetzt einen Wert der Matrix
      ;
end;
Gruß Hawkeye
  Mit Zitat antworten Zitat