Главное меню delphi

Repeat
<оператор1>; <оператор2>; <оператор3>; 
……………. <операторN>;
Until
<условие>; 
Repeat и Until – служебные слова (повторять [до тех пор] … пока [не будет выполнено усло-
вие]); условие – это либо логическое выражение, либо переменная логического типа, но работает 
здесь оно совсем не так, как в операторе с предусловием While. Если в цикле While подразумевается 
алгоритм «выполнять пока истинно условие», то оператор Repeat...Until соответствует логике «вы-
полнять пока условие не станет истиной».
Для наглядности приведем примеры «вечных» циклов, то есть таких циклов, которые никогда 
не завершатся естественным способом: 
While
True
Do
begin 
………………… 
end
; 
Repeat
…………………
Until
False; 
В связи с тем, что циклы могут иметь такие условия, которые не позволят им завершиться, а 
также с тем, что иногда требуется, досрочное завершение выполнения тела цикла в Delphi существу-
ют следующие процедуры: 
Break – реализует немедленный выход из цикла; действие данной процедуры заключается в 
передаче управления оператору, стоящему сразу за концом циклического 
оператора; 
Continue – обеспечивает досрочное завершение очередного прохода цикла; эквивалент передачи 
управления в самый конец циклического оператора. 
Введение этих операторов практически сводит к нулю необходимость оператора безусловного 
перехода GoTo. 
Оператор выбора CASE 
Допустим, нам необходимо проверить достаточно большое количество условий накладываемых 
на одну переменную, имеющую 
перечислимый
тип. Можно конечно использовать большое количе-
ство условных операторов, но это не всегда удобно и, к тому же, загромождает программу. Для по-
добных случаев в Delphi предусмотрен 
оператор выбора
. Это еще одно средство ветвления про-
граммы, но если условный оператор разбивает процесс на две ветви, то оператор выбора может раз-
бить процесс на несколько ветвей, количество которых ограничено только количеством допустимых 
значений перечислимого типа.