To/fr

From Lazarus wiki
Jump to navigationJump to search
The printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.

Deutsch (de) English (en) français (fr) русский (ru)

Mot-clé utilisé pour indiquer la valeur finale de la variable de contrôle dans une boucle For, et que la boucle va incrémenter la variable de contrôle de 1 à chaque boucle. La valeur spécifiée par TO doit être supérieure ou égale à la valeur initiale de la boucle (dans le cas contraire, la boucle n'est pas exécutée).

For to do

var i : integer;
begin
 for i := 1 to 10000 do
   begin
     //...
   end;
end;

Le For...to permet d'exécuter du code répétitivement avec un nombre fixé d'itérations.

Exemple basique

var
  loopValue, startValue, endValue, resultValue: integer;
begin
  startValue := 10;
  endValue := 11;
  resultValue := 0;
  for loopValue := startValue to endValue do
    begin
      resultValue := loopValue + resultValue;
    end;
end;

La boucle s'exécute deux fois et la valeur de la variable resultValue est 21.

Valeurs de début et fin identiques

var
  loopValue, startValue, endValue, resultValue: integer;
begin
  startValue := 10;
  endValue := 10;
  resultValue := 0;
  for loopValue := startValue to endValue do
    begin
      resultValue := loopValue + resultValue;
    end;

end;

La boucle s'exécute une fois et la valeur de la variable resultValue est 10.

Valeur initiale supérieure à la valeur finale

var
  loopValue, startNumber, endNumber, resultValue: integer;
begin
  startValue := 10;
  endValue := 9;
  resultValue := 0;
  for loopValue := startValue to endValue do
    begin
      resultValue := loopValue + resultValue;
    end;

end;

La boucle ne s'exécute pas et la valeur de la variable resultValue est 0.

Lire en plus