Delphi/Lazarus: Parcourir Array indépendant de l’Index

Utilisez simplement low(array) et high(array) au lieu de 0 et length(array). Avec low(), vous obtenez le premier index du tableau, avec high(), vous obtenez le dernier.

Le "-1" dont vous avez besoin lorsque vous utilisez length(array) n'est pas nécessaire puisque vous recevez directement le dernier index du tableau.

var
  array_dyn: array of integer;
  array_stat: array[2..7] of integer;
begin
  SetLength(array_dyn, 5);

  for i := low(array_dyn) to high(array_dyn) do begin
     // correspond à i := 0 to 4
     array_dyn[i] := 1;
  end;

  for i := low(array_stat) to high(array_stat) do begin
     // correspond à i := 2 to 7
     array_stat[i] := 1;
  end;

end;

Comme vous pouvez le voir dans cet exemple, vous pouvez utiliser low() et high() avec des tableaux statiques et dynamiques.
18/01/2024 à 22:56