Basic Pascal Tutorial/Chapter 3/CASE

From Free Pascal wiki
Revision as of 21:06, 19 March 2014 by E-ric (talk | contribs)
Jump to navigationJump to search

български (bg) English (en) español (es) français (fr) 日本語 (ja) 中文(中国大陆)‎ (zh_CN)

3Cb - CASE (auteur: Tao Yue, état: traduit)

Case ouvre une instruction case. L'instruction case compare la valeur d'une expression ordinale à chaque sélecteur, qui peuvent être une constante, une sous-plage ou une liste de celles-ci séparées par des virgules. Le champ sélecteur est séparée de l'action (instructions) par deux-points (:).

Supposez que vous voulûmes vous brancher sur une voie si b vaut 1, 7, 2037 ou 5 et sur une autre sinon. Vous pourriez faire comme cela:

if (b = 1) or (b = 7) or (b = 2037) or (b = 5) then
  Instruction1
else
  Instruction2;

Mais dans ce cas, il pourrait être plus simple de lister les nombres pour lesquels vous voulez que Instruction1 s'exécute. Vous ferez alors cela avec une instruction case:

case b of
  1,7,2037,5: Instruction1;
  otherwise   Instruction2
end;

The general form of the case statement is:

case selector of
  List1:    Statement1;
  List2:    Statement2;
  ...
  Listn:    Statementn;
  otherwise Statement
end;

The otherwise part is optional. When available, it differs from compiler to compiler. In many compilers, you use the word else instead of otherwise.

selector is any variable of an ordinal data type. You may not use reals!

Note that the lists must consist of literal values. That is, you must use constants or hard-coded values -- you cannot use variables.

précédent table des matières suivant