 |
Методические указания
к
разработке образца Delphi-приложения
для курсовой работы по дисциплине
"ИНФОРМАТИКА" |
составил:
профессор каф. СМиУК В. А .Коднянко |
2019 г.
|
|
|
|
 |
ведение |
На
этой странице представлен пример задачи, решение
которой связано с манипуляциями над одномерным и
двумерным массивами.
Рассмотрены этапы
разработки Delphi-приложения - от
создания нового до эксплуатации готового
приложения.
Часть материалов
находится на этой странице, часть скрыта под
гиперссылками в html-файлах. |
|
|
Постановка задачи |
Задан
прямоугольный массив А из N строк и M столбцов.
Необходимо отсортировать его строки в
порядке роста, а также сформировать одномерный
массив U из наибольших элементов строк массива А
и отсортировать массив U в порядке роста. |
| Методика
решения |
В качестве исходных данных будем
использовать переменные: N, M - количество строк и
столбцов матрицы и саму матрицу А.
Для этого используем два
компонента SpinEdit и компонент Memo соответственно.
Результаты расчетов
будем выводить в другой компонент Memo.
Основная идея решения
состоит в использовании процедуры Sort,
которая будет последовательно применена для
сортировки строк матрицы А, затем - для
сортировки массива U.
Сначала будем
производить последовательнаю сортировку строк
матрицы А и параллельно - поэлементное
формирование массива U из последних элементов
этих строк, поскольку после сортировки именно
они станут наибольшими.
Затем процедуру Sort
применим к массиву U.
В результате будут
выполнены все операции, предписанные заданием. |
|
Разработка приложения на Delphi |
Ниже
приведены методические указания для
последовательного программирования решения в
среде Delphi, целью которого
является создание работающего Windows-приложения.
Сначала внимательно
ознакомьтесь с матералами соответстаующего
раздела, затем приступайте к выполнению его
указаний. |
|
Создание
нового приложения |
|
Запустите Delphi.
Если в нем находится
какое-нибудь приложение, закройте его командой File/Close
All.
Создайте новое
приложение командой File/New Application. На
экране должна появиться чистая форма с именем Form1.
Сохраните приложение в своей личной
папке. Для
этого щелкните по кнопке Save All
(сохранить всё) панели Delphi.
Сначала создайте в своей папке новую папку
под проект и файлы этого проекта. Папке можно
дать, например, имя CursJob. Сохраните
модуль unit1.pas под именем main.pas,
затем проект Project1.dpr сохраните под
именем CursJob.dpr. Это ответственный
момент. Если у Вас возникли затруднения с
сохранением этих данных, лучше обратиться за
помощью к преподавателю. |
|
Конструирование
формы |
|
 Создание экранной формы,
дизайн интерфейса приложения.
|
|
Программирование. Часть 1 |
|
Вспомогательная часть
работы.
Описание глобальных
констант, типов и переменных.
Подготовка
вспомогательных функций общего назначения.
Подготовка процедур и
функций ввода/вывода для компонентов Memo.
|
|
Программирование. Часть 2 |
|
Основная часть работы.
Процедура сортировки
одномерного массива.
Программирование
процесса сортировки массива А, создания и
сортировки массива U.
Программирование событий
сохранения исходных данных в файле и вызова
исходных данных из этого файла.
Программирование событий
закрытия приложения и освобождения памяти,
занятой динамическими массивами. |
|
Текст
модуля main.pas |
|
 Полный
текст модуля main.pas.
|
|
Текст
модуля CursJob.dpr |
|
Полный
текст модуля проекта CursJob.dpr. |
| Запуск
приложения и его эксплуатация |
По
окончании программирования нажмите кнопку Run на панели Delphi
для компиляции и последующего запуска
приложения.
После появления окна
приложения установите размеры матрицы и введите
в поле Memo1 необходимое для заполнения
матрицы количество чисел.
Щелкните по позиции меню Выполнить
и посмотрите результаты расчетов в поле Memo2.
Ниже приведен пример окна
с вариантом исходных данных и результатами
расчета.
Далее
поэкспериментируйте с размерами матрицы:
посмотрите как будет реагировать приложение
после изменения размеров N и M и
щелчка по позиции Выполнить.
Проведите эксперименты с
некорректными исходными данными: например, когда
чисел в Memo1 недостаточно, когда в Memo1
содержатся данные, отличные от чисел.
Проверьте работу
процедур очистки компонентов Memo.
Проверьте работу
процедуры Файл/Сохранить сохранения
данных, расположенных в Memo1.
Проверьте работу
процедуры Файл/Открыть вызова
данных из этого файла в Memo1.
Закройте приложение
командой Выпонить.
------------------------------------------------------------
Закройте проект в Delphi командой File/Close All.
Закройте
Delphi командой File/Exit. |
| |
|
 К началу страницы |
Здесь
посмотреть ... |
|
|
