Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs)

IF	Si
Delphi/Kylix/Lazarus

Syntaxe

If exp_bool Then inst1;

If exp_bool Then inst1 else Inst2;

Paramètres

Nom	Description
exp_bool	Ce paramètre permet d'indiquer une expression booléen devant être vrai
inst1	Ce paramètre permet d'indiquer l'instruction exécuté si la condition est vrai
Inst2	Ce paramètre permet d'indiquer l'instruction exécuté si la condition est fausse

Description

Ce mot réservé permet d'effectuer des branchements d'instruction ou de bloc d'instruction en fonction de certaines conditions.

Remarques

Les programmeurs de langage de programmation C sont habitués à utiliser le point-virgule comme terminateur d'instruction, mais dans le langage de programmation Delphi et Pascal, un point-virgule est un séparateur d'instruction. En particulier, aucun point-virgule n'est autorisé après la première instruction et avant le mot réservé else. Le Delphi assouplit certaines des restrictions sur les points-virgules. Il est donc facile pour les programmeurs C, C++ et Java de se laisser aller à l'idée que les points-virgules de Delphi peuvent mettre fin aux instructions.
Par défaut, les opérateurs booléens de Delphi intègre la logique de raccourci (tout comme leurs frères en C, C++ et Java). Voir les opérateurs AND et OR pour plus de détails.

Exemples

Cet exemple permet de tester une condition vrai :


									
Program IfSamples;

 
{$APPTYPE CONSOLE}

Uses SysUtils;


     

BEGIN

 If True Then WriteLn('La condition est vrai');

END.

on obtiendra le résultat suivant :

La condition est vrai

Ces exemples, en Delphi, permet de tester le mot réservé «IF» d'un peu toute les façons :


				
Program IfSamples2;

 
{$APPTYPE CONSOLE}

Uses SysUtils;


     

BEGIN

 If False Then WriteLn('FALSE');

 If Not False Then WriteLn('NOT FALSE');


 If True Then WriteLn('TRUE');

 If Not True Then WriteLn('NOT TRUE');


 If Boolean(0)Then WriteLn('0');

 If Boolean(NOT 0)Then WriteLn('NOT 0');


 If Not Boolean(0)Then WriteLn('NOT(0)');

 If Boolean(1)Then WriteLn('1');


 If Boolean(NOT 1)Then WriteLn('NOT 1');

 If Not Boolean(1)Then WriteLn('NOT(1)');


 If 100 > 300 Then WriteLn('100 > 300');

 If Boolean(1-Byte(100 > 300))Then WriteLn('1-(100 > 300)');


END.

on obtiendra le résultat suivant :

NOT FALSE TRUE NOT 0 NOT(0) 1 NOT 1 1-(100 > 300)

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Type de données élémentaires - Boolean
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - End

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

Section courante

A propos

Section administrative du site

IF