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é :
- Program DoSamples;
-
- {$APPTYPE CONSOLE}
-
- Uses SysUtils;
-
- Var
- Enregistrement:Record
- champA,champB:Integer;
- End;
- I:Integer;
-
- BEGIN
- With Enregistrement do Begin
- champA := -10;
- champB := 3;
- For I:=champA to champB do Begin
- Try
- WriteLn('I = ',I,', 1/I = ',1/I:0:2);
- Except
- On EDivByZero do WriteLn('Division par 0');
- End;
- End;
- End;
- END.
on obtiendra le résultat suivant :
I = -10, 1/I = -0.10I = -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