1.3. Проектирование структуры программы и взаимодействия модулей
Любая база данных является составной частью какой-либо информационной системы (ИС), которая не только хранит данные, но и обрабатывает их. Поэтому, проектированию данных всегда сопутствует (а чаще предшествует) проектирование алгоритмов их использования.
Программа на языке Delphi - это компактный код, задача которого состоит в том что бы вызвать на экран форму и обслуживающий ее модуль.
Модуль в программировании представляет собой функционально законченный фрагмент программы или автономно компилируемую программную единицу, оформленную в виде отдельного файла с исходным кодом или поименованной непрерывной его части (например, Active Oberon), предназначенный для использования в других программах. Модули позволяют разбивать сложные задачи на более мелкие в соответствии с принципом модульности. Обычно проектируются таким образом, чтобы предоставлять программистам удобную для многократного использования функциональность (интерфейс) в виде набора функций[10].
Представление алгоритма решения задачи в виде подзадач называется процедурной декомпозицией. В соответствии с объектно-ориентированной технологией была проведена декомпозиция предметной области на объекты и разработана структурная схема справочной системы.
Программирование в среде Delphi предполагает соблюдение принципа модульности, поэтому при разработке программного продукта, для понимания взаимодействия отдельных модулей, на основе структурной схемы составлена функциональная схема (Рис.1.1).
Файл Project1.dpr подключает все модули в одну программу. Файл Unit2.pas запускает форму, которая позволяет выбрать режим работы. Файл Unit1.pas позволяет запустить форму просмотра расписания, в которой пользователь может начать работу с приложением «Электронное расписание занятий». Unit3.pas позволяет добавить в таблицу новые данные и исправить уже имеющиеся. Файл Unit4.pas позволяет запустить форму, содержащую информацию об авторе. Файл Unit5.pas позволяет запустить форму, содержащую информацию о программе.
Рис.1.1. Функциональная схема программного продукта
В качестве основной структуры данных была выбрана таблица. Все данные вносит пользователь. В связи со сложной структурой данных была выбрана объектно-ориентированная модель программы. Одним из самых наилучших средств для этой модели является среда разработки Borland Delphi 7.0.
Мы определили структуру программы и взаимодействие составляющих ее модулей. Что позволяет перейти к непосредственной разработке приложения в среде Borland Delphi 7.0.
Раздел 2. Описание и функциональные возможности программного приложения
2.1. Особенности построения и работы алгоритма
В разрабатываемом программном приложении мы использовали технологию баз данных. Возможности доступа к базам данных в Delphi обеспечиваются классом TDataSet. TDataSet, как подсказывает имя, представляет наборы данных, подобные строкам в таблице и обеспечивает как реляционный, так и навигационный доступ к данным. TDataSet определяет всю основную навигацию по записям и функции редактирования. TDBDataSet, порожденный непосредственно от TDataSet, представляет наборы данных, которые связаны с базой данных BDE (Borland Database Engine) [15, 156].
Навигационный способ доступа заключается в обработке каждой отдельной записи набора данных. Этот способ обычно используется в локальных БД или в удаленных БД небольшого размера. При навигационном способе доступа каждый набор данных имеет невидимый указатель текущей записи. Указатель определяет запись, с которой могут выполняться такие операции, как редактирование или удаление. Компоненты Table и Query позволяют управлять положением этого указателя. Поля текущей записи доступны для просмотра.
Применяя навигационный способ, мы осуществили следующие операции:
- сортировку записей;
- навигацию по набору данных;
- редактирование записей;
- вставку и удаление записей;
- поиск записей.
После запуска программы перед пользователем появляется первая форма выбора режима «Электронного расписания занятий СОФ НИУ «БелГУ» (Рис.2.1).
Рис. 2.1. Форма выбора режима работы
При выборе режима «заполнение» перед пользователем появляется форма zapolnenie (Рис.2.2).
Рис.2.2. Форма заполнения информации о расписании занятий
При выполнении команды Справка→ О программе становится активной форма «О программе» (Рис.2.3).
Рис.2.3. Форма «О программе».
При выполнении команды Справка→ Об авторе становится активной форма, содержащая информацию о разработчике программного продукта (Рис.2.4).
Рис.2.4. Форма «Об авторе».
При выборе режима «просмотр» перед пользователем появляется форма prosmotr (Рис.2.5).
Рис. 2.5. Форма просмотра расписания
В качестве основного алгоритма программы рассмотрим пример запроса расписания групп:
procedure Tprosmotr.Button1Click(Sender: TObject);
var s1:Tbutton; ng,ng1: string;
begin
s1:=Sender as Tbutton;
if button1.Caption<>'1 курс' then begin
s1:=Sender as Tbutton;
s:=s1.Caption;
nadpis;
end
else begin Showmessage(s) ;
case s[1] of
'П': ng:='1';
'Р': ng:='2';
' ': ng:='3';
'Ф': ng:='4';
'И': ng:='5';
'М': ng:='6';
'Г': ng:='7';
'Э': ng:='8';
'У': ng:='9';
'Б': ng:='10';
end;
ng:=ng+s1.Caption[1];
ng1:=ng+'5';
ng:=ng+'0';
with Query1.SQL do begin
Clear;
Add ('select Nomer_par, Disciplina, Dolgnost, Prepodavatel, ayditoria, potok');
Add ('from ":rasp:база расписание.db"');
Add ('where (Nomer_gryp<='+ng1+')and (Nomer_gryp>='+ng+')');
Add ('order by Nomer_gryp ');
end; ;
{DataSource1.DataSet:=query1;}
Showmessage(ng) ;
if query1.RecordCount<>0 then
datasource1.DataSet:=query1
else begin
showmessage('Таких записей нет');
datasource1.DataSet:=table1;
end;
dataSource1.DataSet.Active:=true;
end;
end.
Таким образом, совокупность разрабатываемых таблиц, форм, модулей, запросов и отчетов и создают информационно-справочную систему «Электронного расписания СОФ НИУ «БелГУ», работа с которой позволяет получать информацию о расписании ее дальнейшее редактирование, сохранение и вывод результатов.