-
Основы Delphi
- Основы программирования на Delphi
- Компоненты Delphi. Начинаем писать свои первые приложения на Delphi
- Основные принципы программирования в Delphi. Начинаем программировать самостоятельно
- Delphi и Microsoft Word
- Delphi и Microsoft Excel
- Delphi и Microsoft Access
- Delphi и OpenOffice Writer
- Delphi и OpenOffice Calc
- Создание игр на Delphi
- Игра Пристрели птичку
Delphi и MSOffice
Delphi и OpenOffice
Delphi и Интернет
Delphi и игры
Delphi Android
Школа программирования Delphi
Портал DelphiSchool является бесплатным проектом, обеспечивающим пользователям быстрый и легкий доступ к урокам программирования на Delphi. Сайт позволяет научиться программировать на Делфи любому, кто хочеть писать свои программы, игры, Android приложения, программы для MAC OC или IOS. Кроме уроков Delphi и статей Delphi, на сайте доступны также и видеоуроки. Практически к каждому уроку, пользователю доступен исходник, изучив который, он сможет наглядно посмотреть как работает та или иная программа, написанная на Делфи. Кроме того мы постараемся прилагать к каждому материалу (статье, уроку, видеоуроку) файлы Delphi, которые будут помогать изучить предоставленный материал.
Каждый кто решил написать свою программу, создать свое приложение, научиться программировать и т.д., найдет на DelphiSchool статьи Delphi, уроки Delphi, видеоуроки Delphi, исходники Delphi, файлы Delphi, изучит компоненты Delphi, посмотрит Delphi примеры и многое другое абсолютно бесплатно. Все о Delphi программировании теперь собрано на одном сайте!!!
Главная » Уроки Delphi » Основы Delphi » Основные принципы программирования в Delphi. Начинаем программировать самостоятельно |
Следующий тип циклов, который следует рассмотреть это repeat ... until. Этот тип цикла похож на while, который мы рассматривали в уроке Циклы While в Delphi. Даже смысл цикла похож. Он означает - выполнять действия, пока не выполнится определенное условие. Только в цикле repeat ... until есть несколько отличий. 1. В цикле while действия выполнялись, пока условие верно. В цикле repeat действия будут выполняться, пока условие неверно и прекращается, когда оно станет верным. 2. В цикле while выполнение условия проверяется перед началом действий. Это значит, что если условие заведомо неверно, то действия цикла не будут выполнены. В цикле repeat сначала выполняется действие, а потом происходит проверка. Это означает, что если условие заведомо неверно, действие все равно будет выполнено один раз, просто на второй проход цикла перехода не будет. В общем виде цикл repeat выглядит так: Repeat Действия Until Условие; Следует отметить, что в этом случае, действий может быть несколько. Тут уже не надо объединять несколько действий в begin и end, потому что repeat … until уже действует как объединение нескольких действий. Как всегда давайте рассмотрим на примере использование этого типа цикла. Возьмем исходник из прошлого урока и добавим в эту программу еще одну кнопку, поменяв ее заголовок на «Цикл Repeat». Создадим обработчик события OnClick для кнопки «Цикл Repeat» и напишем такой код: Код procedure TForm1.Button3Click(Sender: TObject); var index:Integer; sum: Integer; EndCount:Integer; begin Sum:=0; index:=0; EndCount:=StrToInt(EndEdit. Text) ; repeat Sum:= Sum+index; index:=index+1; until index>EndCount; ResultEdit.Text:=IntToStr(Sum); end; Здесь действия будут выполняться в цикле, пока переменная index не станет больше числа, указанного в EndCount. К уроку (статье) Циклы Repeat … Until в Delphi прилагается исходник, посмотрев который, вы можете ознакомиться с полным исходным кодом программы и посмотреть как работает созданная программа. Исходный код сопровождается комментариями, благодаря чему вы сможете легко в нем разобраться. Но я настоятельно рекомендую делать все самостоятельно. Так вы лучше и быстрее усвоите то, о чем говорилось в этом уроке Для того чтобы получить возможность скачать исходник Delphi к этому уроку, необходимо посетить сайт рекламодателя. После этого, появится ссылка на исходник Delphi к уроку Циклы Repeat … Until в Delphi | |
Добавить Циклы Repeat … Until в Delphi в закладки: |
Диалоговые окна в Delphi. ShowMessage, MessageDlg, MessageDlgPos, InputBox и InputQuery |
Delphi и RadioGroup. Пример работы с группой компонентов RadioButton в Делфи |
Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi |
Delphi и TButton. Учимся работать с кнопкой в Delphi. Часть 2. События кнопки |
Delphi и ComboBox. Пример работы с ниспадающими списками в Делфи |
Delphi и TEdit. Пример работы со строками ввода в Делфи |
Константы в Delphi. Объявление констант в Делфи |
Управление циклами в Delphi. Операторы Continue и Break. |
Delphi и CheckBox. Пример работы с CheckBox в Делфи |
Delphi и TPanel. Пример работы с панелями в Делфи |
Всего комментариев: 0 | |