Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Методичка_Delphi_Ч1.doc
Скачиваний:
7
Добавлен:
02.11.2018
Размер:
2.38 Mб
Скачать

Создание проекта WhileRepeat

В этом проекте студент должен реализовать разработанные выше алгоритмы решения уравнения методом итераций и вычисления суммы бесконечного ряда, требующие использования инструкций whiledo или repeatuntil.

В качестве образца мы будем рассматривать создание проекта для вычисления кубического корня методом итерации и вычисления значения функции синус путем нахождения суммы бесконечного ряда. Алгоритмы этих вычислений рассматривались выше.

Задача студента – реализовать подобным образом алгоритмы, соответствующие его варианту.

      1. Разработка интерфейса проекта

Откройте новый проект. Назовите появившуюся форму frmWhileRepeat. В заголовке напишите текст «Построение циклов с инструкциями whiledo или repeatuntil».

Для решения обеих задач можно использовать одну и ту же форму, а интерфейсы задач расположим на отдельных закладках, используя компонент TPageControl.

На рисунке 5.7 показан интерфейс проекта с открытой закладкой «Корень».

Рисунок 5.7 – Интерфейс проекта

Создайте интерфейс своего проекта по аналогии с этим рисунком в соответствии со своим вариантом.

Если новые компоненты вам незнакомы, их описание Вы найдете ниже.

Компоненты PageControl и TabSheet

Компонент PageControl иногда называют блокнотом в стиле Windows. Компонент позволяет размещать в одном окне несколько страниц и обеспечивает возможность переключения с одной страницы на другую. Примером использования такого компонента может служить окно Object Inspector, в котором есть две страницы – Properties и Events.

Компонент PageControl обычно располагается на закладке Win32. Найдите его и разместите на форме. После этого установите курсор в поле компонента и нажмите правую кнопку мыши. В появившемся меню выберите функцию New Page. Проделайте это два раза. В результате должно появиться две страницы блокнота. Страницы блокнота - это тоже компоненты, которые являются объектами класса TTabSheet. У объектов этого класса есть свойство Caption. Используя это свойство, измените заголовки станиц в соответствии со своим вариантом. Мы же озаглавим страницы так: «Корень», «Синус».

Компонент CheckBox

Этот компонент используется в проекте для того, чтобы управлять выводом последовательных приближений (промежуточных значений результата) в поле Memo.

Основное свойство этого компонента Checked может принимать значения true или false (включено или выключено). Анализируя это свойство в программе, мы можем управлять ходом вычислений.

В нашем проекте компоненту CheckBox присвоим имя CheckSteps.

Создание закладки для вычисления корня

Страницу для вычисления корня оформим, используя известные компоненты TLabel, TEdit, TButton, OleContainer и TMemo. Вид этой страницы блокнота был представлен выше, на рисунке 5.7.

Компоненты, имена которых понадобятся при программировании, назовем так:

edtA – для ввода числа, из которого извлекается корень,

edtEps1 – для ввода точности вычислений,

edtResult1 – для вывода полученного результата вычислений,

edtControl1 – для вывода контрольного значения, с помощью которого можно проверить правильность полученного результата. В данном случае это будет тройное произведение результата, то есть результат в кубе.