 |
Табулирование функций в Borland Delphi.
|
|
|
|
Цель: программирование циклов в среде программирования Borland Delphi.
Задачи:
1) Создать форму по заданию и выполнить остальные действия.
2) Убедиться в работоспособности разработанной программы.
Перечень оборудования и программного обеспечения: ПК, находящийся в локальной сети, операционная система Windows, среда программирования Borland Delphi.
Литература: 3, 7, 12, 13, 24, 27, 29, 30, 37, 39.
Краткое изложение основных теоретических и методических аспектов:
Объект Memo применяют для многострочного редактора текста, CheckBox - для создания независимого двух или трёхпозиционного флажка: включен, выключен или серый. Панель группы (GroupBox) предназначена для размещения на ней группы из нескольких объектов, используемых для улучшения дизайна окна программы. С помощью объекта MainMenu создают главное меню программы, а с помощью объекта PopupMenu - контекстное меню компонента. Для связывания контекстного меню с объектом необходимо свойству этого объекта присвоить значение Name соответствующего контекстного меню.
Для смены пиктограммы нужно указать конкретный файл с рисунком в поле значения свойства Icon (пиктограмма) формы. Щелкнуть в строке Icon на 
, а потом на кнопке Load окна Picture Editor, чтобы получить окно Load picture. Открыть и выбрать графический файл пиктограммы => Open => Ok.
Чтобы выровнять и отцентрировать объекты - окно Alignment. Выделить группу объектов с подписями к ним и выполнить Edit=> Align (выровнять)=> Horisontal - Left sides (горизонтально - левые границы)=> Vertical – Space equally (вертикально - равномерно)=> Ok или Edit=> Align=> Horisontal - Center in Window (горизонтально - к центру окна)=> Ok.
Для вставки в форму панели группы объектов выбираем GroupBox 
на закладке Standard палитры компонентов, флажков - CheckBox 
, многострочного поля редактирования - Memo 
на закладке Standard. Для вставки главного и контекстного меню - MainMenu 
и PopupMenu 
там же, на этапе выполнения программы они невидимы. Для ввода названия команд главного меню формы выбрать MainMenu и щелкнуть на свойстве Items или дважды на объекте и закрыть окно создания команд главного меню Form1.MainMenu.
|
|
|
Методы - это набор процедур и функций, которые применяют к объекту. Имя объекта от имени метода отделяется точкой. Программирование команды «Очистить поле вывода» главного меню с помощью метода Clear объекта Memo выполняется так. После щелчка по команде меню «Очистить поле вывода» появится заготовка процедуры реакции на событие вызова. В нее записывается команда вызова метода Clear для очистки поля вывода Memo:
procedure TForm1.N3Click (Sender: Tobject);
{ N3 - имя команды «Очистить поле вывода», может быть другой номер }
begin
Memo1.Clear { Вызов очищающего метода объекта Memo }
end;
Для построения графика функции в форму вставляется объект ChartFX из закладки OCX. Дважды щелкнуть на нем и на закладке Appearance из списка Gallery Type, выбрать пиктограмму графика. На закладке 3DView убрать флажок 3D. На закладке DataValues задать ожидаемые (ориентировочно) максимальное и минимальное значения функции. Создать пункт меню или кнопку «Нарисовать график» и запрограммировать:
procedure TForm1.Button1Click (Sender: TObject);
var i, n: integer;
x: real;
s: string;
begin
x:= 0; n:= 10; {n- количество точек}
ChartFX1.OpenDataEx (COD_VALUES, 1, n);
for i:= 0 to n-1 do
begin
ChartFX1.Value[i]:= sin (x) + 1; { Формируем легенду оси ОХ}
Str (x:5:2,s);
ChartFX1.Legend[i]:= s;
x:=x+0.5;
end;
ChartFX1.CloseData(COD_VALUES);
end;
Самостоятельно изучить вопросы:
1. Назовите три основных типа алгоритмов обработки данных?
Контрольные вопросы:
1. Почему модули применяются в современном программировании?
2. Сравните модули и подпрограммы.
3. Должно ли имя модуля совпадать с именем файла, в котором он находится?
Задания: Создать форму «Табулирование функции» для вычисления функции y=sin(x)+1 с запросом левой, правой границы и шага. Добавить производную этой функции. На основе разработанной формы рассмотреть решение других задач.
|
|
|
Порядок выполнения:
1) Загрузить среду программирования Delphi.
2) Поменять заголовок формы с Form1 на «Табулирование функции» и увеличить вертикальные размеры формы. Сменить пиктограмму в левом верхнем углу формы, указав конкретный файл с рисунком в поле значения свойства Icon (пиктограмма) формы. Сохраните форму в своей папке.
3) Расположить в форме три поля редактирования Edit и соответствующие им текстовые ноля «Левая граница», «Правая граница», «Шаг», а также текстовое поле для задания вида функции y=sin(x)+1. Выровнять вставленные поля редактирования к левому краю первого объекта и отцентрировать текстовое поле с указанием функции. Сохранить.
4) Вставить в форму панель группы объектов CroupBox, назвать его Вывод. Размер, стиль и цвет шрифта выбирать. Увеличить панель группы.
5) Вставить на панель три флажка CheckBox. Выровнять, заблаговременно выделив, и поменять подписи. Стиль и цвет шрифтов выбрать на своё усмотрение. Установить флажки «На экран» и «В массив» в режим «включен».
6) Вставить в форму многострочное поле редактирования Memo и удалить из него слово Memo. Задать начальные значения полей редактирования левой и правой границ аргумента и шага изменения аргумента (свойства Text).
7) Вставить в форму главное и контекстное меню MainMenu и PopupMenu. Расположить их в произвольном месте формы. Введите названия команд главного меню («Вычислить», «Выход») и контекстного меню формы («Очистить поле вывода»). Связать контекстное меню PopupMenu с формой.
8) Запрограммировать команду «Очистить поле вывода» главного меню с методом Clear в Memo и команду «Выход» главного меню, воспользовавшись стандартной процедурой Close (см. лабораторную работу №11). Запрограммировать команду «Очистить поле вывода» контекстного меню.
9) Запустить созданную программу и исследовать ее работу. В многострочном поле редактирования Memo можно выполнять действия, как в текстовом редакторе: выделять фрагмент текста, копировать, переносить или удалять этот фрагмент. Закончите работу программы, щелкнув на кнопке «Выход».
10)Запрограммировать команду «Табулировать». Выполнить программу и поупражняться с разными значениями левой, правой границы и шага аргумента. Закрыть окно программы «Табулирование функции».
|
|
|
11)Сохранить программу в своей папке. Создать ехе-файл. Закрыть Delphi, запустить программу и выполните вычисления для различных входных данных.
12)Добавить к контекстному меню команду «Выход» и запрограммировать ее.
13)Создать и запрограммировать контекстное меню с командами «Убрать все флажки», «Включить все флажки», «Включить инверсивно». Оно должно появляться после щелчка правой клавишей мыши в любой точке панели с флажками. Привязать это меню к панели с флажками.
14)Модифицировать программу, предусмотрев возможность табулирования функции и ее производной. Выбор варианта (с производной или без неё) осуществить с помощью дополнительного флажка.
15)Определить количество элементов массива больших 0.5 и меньших 1. Предусмотреть дополнительную возможность для определения максимального и минимального значений функции.
16)Поменять процедуру команды «Табулировать», чтобы для включенного флажка «В массив» вывод результатов выполнялся в одномерный массив.
17)Вставить в форму объект ChartFX для построения графика функции.
18)Оформить отчет с программным кодом и формами с результатами работы.
19)Сделать вывод по полученным результатам работы.
Лабораторная работа № 13
|
|
|
