Instruction Case
L ’instruction AuCasOu permet d ’exécuter des instructions d'une liste d'instructions en fonction de la valeur d'une expression.
Case EXPRESSION Of
{ CONSTANTE : INSTRUCTION }
[ Else INSTRUCTION]
L'expression associée au case est évaluée, puis le résultat est comparé à chacune des constantes énumérées; à la première égalité entre le résultat de ll'expression et la constante l'instruction associée est exécutée.
Case ed.LastKey() of 0x10 : NbLigne = NbLigne+1; 0x13: Null; // Retour chariot aucune action else NbChar = NbChar + 1;