30) Оператор цикла Repeat

Создавая приложения довольно часто приходиться сталкиваться с необходимостью повторения одной и той же последовательности действий.

Delphi нам предлагает еще одну форму условного оператора цикла, которая отличается от цикла while. Во  первых тем, что проверка условия будет выполнена не в начале цикла, а в конце и следовательно хоть один раз тело цикла будет выполнено. И во вторых завершается выполнения цикла, когда условное выражение   равно TRUE, а не FALSE.

Структура такого цикла будет выглядеть так:

repeat тело цикла until условие;

Где

• repeat until - зарезервированные слова;

• тело цикла Последовательность операторов языка Delphi

• условие - логическое условие.

При использовании оператора repeat тело цикла, которое состоит из нескольких операторов заключать в составной оператор begin...end нет необходимости (в отличии от других операторов языка Delphi). Границы тела цикла определяются по зарезервированным словам repeat/until.

Для закрепления, создадим приложение вычисляющее  таблицу умножения для числа 3.

На форму перенесем компонент memo, он отобразит нашу таблицу. И простую кнопку, назовем ее Печать. Нажав на нее таблица будет сформирована.

Переменная I последовательно изменяется,  от единицы, пока не станет больше 10 и вычисления прекратятся. Обработчик для кнопки напишем такой:

procedure TForm1.Button1Click(Sender: TObject);

var

I: Integer;

begin

I := 1;

repeat

memo1.Lines.Add(IntToStr(I) + ' x 3 = '+ IntToStr(I*3));

I := I + 1;

until(I > 10);

end;

Итог: Нами был рассмотрен оператор цикла с постусловием repeat.

32) Визуальный компонент StringGrid

Таблица StringGrid Delphi предоставляет все основные возможности для размещения текстовых, а также графических данных в табличной форме. А так как данные имеют "странное" свойство группироваться по строкам и столбцам, то таблица StringGrid имеет важное значение в программировании в системе Delphi. Конечно, для работы с таблицами баз данных в Delphi существует специализированные компоненты. Но в обычных приложениях для работы с табличными данными в Delphi применяется именно компонент StringGrid.    Таблица StringGrid имеет гибкие возможности по настройке своего вида - ширины и высоты отдельных строк и столбцов, как и их количество на этапе проектирования и программно, размера фиксированной области и области редактирования, выделения как отдельной ячейки, так и зоны из нескольких ячеек, и т.д. Доступ к содержимому каждой отдельной ячейки предоставляется по индексу - номеру столбца и строки, в которых она находится.    Если ячейки не помещаются в размеры таблицы, автоматически добавляются как вертикальная, так и горизонтальная полосы прокрутки. Причём в каждый момент известны номера видимых строк и столбцов, и эта область доступна для управления. Таким образом, мы можем программно перемещать в область видимости те ячейки, где содержатся нужные нам данные.    События, на которые может реагировать таблицаDelphi StringGrid, также разнообразны и предоставляют программисту широкие возможности по созданию программ, использующих таблицы, наполненные необходимой функциональностью. Всегда можно отследить нажатие и отпускание как кнопок клавиатуры так и мышки, выделение и перемещение ячеек, их редактирование.    Этот сайт содержит основные сведения о компоненте StringGrid, изучив которые можно писать программы с использованием таблицы Delphi StringGrid. Стиль изложения предоставляет информацию в простой и доступной даже для начинающих форме, сопровождающейся практическими примерами. Успешного изучения и активного применения компонента-таблицы Delphi StringGrid в своих программах!