Delphi для начинающих



 

Инструкция case


Вариант 1:

case Выражение of

Список1_Констант: begin

. { инструкции } end; Список2_Констант: begin

{ инструкции } end;

СписокJ_Констант: begin

{ инструкции } end; end;

Вариант 2.

case Выражение of

Список1_Констант: begin

{ инструкции } end;

Список2_Констант: begin

{ инструкции } end; СписокJ_Констант: begin

{ инструкции J} end; else

begin

{ инструкции } end; end;

Инструкции между begin и end выполняются, если значение выражения, записанного после case, совпадает с константой из соответствующего списка. Если это не так, то выполняются инструкции, находящиеся после else, между begin И end.

Примечание

Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.