Section courante

A propos

Section administrative du site

DO

Faire
Delphi/Kylix/Lazarus

Syntaxe

for Variable := Expression to Expression do Statement;
for each el: String in mylist do
while Expression do Statement;
try Statements except on ExceptionClass do Statement; end;
with Expression do Statement;

Description

Ce mot réservé permet d'indiquer des instructions a exécuter ou traiter selon un certain contexte.

Exemple

Voici quelques exemples typiques de l'utilisation de ce mot réservé :

  1. Program DoSamples;
  2.  
  3. {$APPTYPE CONSOLE}
  4.  
  5. Uses SysUtils;
  6.  
  7. Var
  8.  Enregistrement:Record
  9.   champA,champB:Integer;
  10.  End;
  11.  I:Integer;
  12.  
  13. BEGIN
  14.  With Enregistrement do Begin
  15.   champA := -10;
  16.   champB := 3;
  17.   For I:=champA to champB do Begin
  18.    Try
  19.     WriteLn('I = ',I,', 1/I = ',1/I:0:2);
  20.    Except
  21.     On EDivByZero do WriteLn('Division par 0');
  22.    End;
  23.   End;
  24.  End;
  25. END.

on obtiendra le résultat suivant :

I = -10, 1/I = -0.10
I = -9, 1/I = -0.11
I = -8, 1/I = -0.13
I = -7, 1/I = -0.14
I = -6, 1/I = -0.17
I = -5, 1/I = -0.20
I = -4, 1/I = -0.25
I = -3, 1/I = -0.33
I = -2, 1/I = -0.50
I = -1, 1/I = -1.00
Exception EZeroDivide dans le module dosamples.exe à 00007A83.
Division flottante par zéro.

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Begin
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - End
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Except
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - For
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Repeat
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Try
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - While
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - With

Dernière mise à jour : Mercredi, le 18 février 2015