Откройте новый проект. Назовите появившуюся форму frmWhileRepeat. В заголовке напишите текст «Построение циклов с инструкциями while…do или repeat…until».
Для решения обеих задач можно использовать одну и ту же форму, а интерфейсы задач расположим на отдельных закладках, используя компонент TPageControl.
На рисунке 5.7 показан интерфейс проекта с открытой закладкой «Корень».
Рисунок 5.7 – Интерфейс проекта
Создайте интерфейс своего проекта по аналогии с этим рисунком в соответствии со своим вариантом.
Если новые компоненты вам незнакомы, их описание Вы найдете ниже.
5.2.1.1 Компоненты PageControl и TabSheet
Компонент PageControl иногда называют блокнотом в стиле Windows. Компонент позволяет размещать в одном окне несколько страниц и обеспечивает возможность переключения с одной страницы на другую. Примером использования такого компонента может служить окно Object Inspector, в котором есть две страницы – Properties и Events.
Компонент PageControl обычно располагается на закладке Win32. Найдите его и разместите на форме. После этого установите курсор в поле компонента и нажмите правую кнопку мыши. В появившемся меню выберите функцию New Page. Проделайте это два раза. В результате должно появиться две страницы блокнота. Страницы блокнота - это тоже компоненты, которые являются объектами класса TTabSheet. У объектов этого класса есть свойство Caption. Используя это свойство, измените заголовки станиц в соответствии со своим вариантом. Мы же озаглавим страницы так: «Корень», «Синус».
5.2.1.2 Компонент CheckBox
Этот компонент используется в проекте для того, чтобы управлять выводом последовательных приближений (промежуточных значений результата) в поле Memo.
Основное свойство этого компонента Checked может принимать значения true или false (включено или выключено). Анализируя это свойство в программе, мы можем управлять ходом вычислений.
В нашем проекте компоненту CheckBox присвоим имя CheckSteps.
5.2.1.3 Создание закладки для вычисления корня
Страницу для вычисления корня оформим, используя известные компоненты TLabel, TEdit, TButton, OleContainer и TMemo. Вид этой страницы блокнота был представлен выше, на рисунке 5.7.
Компоненты, имена которых понадобятся при программировании, назовем так:
edtA – для ввода числа, из которого извлекается корень,
edtEps1 – для ввода точности вычислений,
edtResult1 – для вывода полученного результата вычислений,
edtControl1 – для вывода контрольного значения, с помощью которого можно проверить правильность полученного результата. В данном случае это будет тройное произведение результата, то есть результат в кубе.
5.2.1.4 Создание закладки для вычисления синуса
Вид страницы для вычисления синуса показан на рисунке 5.8.
Рисунок 5.8 – Закладка для вычисления синуса
Страницу оформлена как и предыдущая, с учетом особенностей вычисления ряда.
Компоненты, имена которых понадобятся при программировании, назовем так:
edtХ – ввод числа, для которого вычисляется синус,
edtEps2 – для ввода точности вычислений синуса,
edtResult2 – для вывода полученного результата вычислений,
edtControl2 – для вывода контрольного значения, с помощью которого можно проверить правильность полученного результата. В данном случае это будет результат, полученный путем вызова стандартной функции синус.