logo
Программирование в среде Delphy / Программирование в среде Delphi

6.4. Оператор разветвления Case

Этот оператор в общем случае может иметь вид

Case выражение of

знач11..знач12:оператор1;

знач21..знач22:оператор2;

………………………..

значK1..значK2:операторK

else оператор0;

end;

В зависимости от значения выражения выполняется тот или иной оператор. Если значение выражения не попадает ни в один из интервалов, то выполняется оператор0.

Пример:

Var c:char; s:String;

…………………….

Case c of

’0’..’9’:s:=’Цифра’;

’A’..’z’:s:=’Латинская буква’;

..’А’..’я’:s:=’Русская буква’

else s:=’Специальный символ’

end;