Таблица 1.2 - Структура таблицы Spec.
Имя поля
Тип данных
Описание
Predmet
Alpha
Текст
Data
Дата
Time
Время
Auditor
Komis
Таблица 1.3 - Структура таблицы Ekzam.
Nazvanie
Bal
Short
Короткое числовое
Kolvo
Таблица 1.4 - Структура таблицы Kurs.
KFam
KName
KOtch
KSpec
Pred1
Связи таблиц показаны на рисунке 2.1.
Рис. 2.1 Связи таблиц.
Поле Nazvanie в таблице Abitur ключевое. В нём хранятся данные о названиях специальностей. В поле Spec в таблице Abitur хранятся данные о специальности, на которую поступает конкретный абитуриент.
2.2 Функции системы
В данной базе данных на основе запросов составлены все отчёты. Запросы написаны в режиме SQL.
Отчёт для вывода всех абитуриентов составлен на следующем запросе:
select *
from abitur.db
Отчёт для вывода абитуриентов не сдавших документы составлен на следующем запросе:
WHERE (att=false) or (med=false) or (spravka=false) or (foto=false)
Отчёт для вывода абитуриентов со с/б больше 8 составлен на следующем запросе:
where ([RusYaz]+[RusLit]+[BelYaz]+[BelLit]+[Matem]+[Inform]+ [CHOG]+[InYaz]+[Geogr]+[Him]+[Fizkult]+[IstBel]+[Vsemirst])/13)>8
Отчёт для вывода информации о экзаменах составлен на следующем запросе:
from ekzam.db
Отчёт для вывода информации о специальностях составлен на следующем запросе:
from spec.db
Отчёт для вывода абитуриентов посещающих курсы составлен на следующем запросе:
from kurs.db
Отчёт для вывода иногородних абитуриентов составлен на следующем запросе:
where City Not Like "Минск"
Отчёт для вывода поступивших абитуриентов составлен на следующем запросе:
where postup=true
order by spec
2.3 Алгоритм работы
2.4 Выходные документы
Выходными документами в данной программе являются отчёты, построенные на основе запросов. Предусмотренные в программе отчёты приведены в приложении 2.
2.5 Тесты на использование
Тесты на использование программы показали, что для корректной работы программы необходимо вводить данные согласно ниже приведённым инструкциям.
При использовании программы в поля с числовыми значениями (оценки абитуриентов) необходимо вводить только цифры, другая информация не вводится. В поля с логическими данными (отметка о поступлении и поданные документы) нужно вводить только слова “True” или “False”, при вводе другой информации программа выдаёт сообщение об ошибке и её необходимо перезапустить.
3 ПРИМЕНЕНИЕ
3.1 Назначение программы
Программа предназначена для учёта абитуриентов в средних специальных учебных заведениях с тремя вступительными экзаменами и общепринятым набором приёма документов (аттестат (диплом), мед. справка, справка о семейном положении, фото).
Также назначением программы является вывод следующих отчётов:
- все абитуриенты;
- абитуриенты, не сдавшие документы;
- абитуриенты со средним балом больше восьми;
- информация о экзаменах;
- информация о специальностях;
- абитуриенты, посещающие курсы;
- иногородние абитуриенты;
- поступившие;
3.2 Инструкции пользователю
Для запуска программы необходимо запустить файл Abitur.exe, который находится в каталоге программы. При запуске программы появится окно, приведённое на рисунке 3.1.
Рис. 3.1 Окно программы при запуске
Для добавления записей необходимо нажать кнопку добавить запись (все кнопки имеют подсказки при наведении на них курсора), для удаления записей, необходимо нажать на кнопку удалить запись. Для изменения данных нужно сделать двойной щелчок левой кнопки мыши на необходимой ячейке, вписать новые данные и нажать клавишу ввод на клавиатуре.
При нажатии на кнопку отчёты появляется окно программы «Отчёты» (Рис 3.2), предназначенное для вывода отчётов.
Рис 3.2 Окно программы «Отчёты»
В окне программы «Отчёты» нужно выбрать нужный отчёт, нажать кнопку вывод, и в появившимся окне нажать кнопку OK.
Для выхода из программы можно нажать кнопку Close или меню файл -> выход или закрыть как стандартное окно Windows.
Для корректной работы программы в ячейки с числовыми данными нужно вводить только числовые значения.
Для вывода справки в программе нажмите F1.
В программе вместо логических «Да» и «Нет» используются “True” и “False” соответственно.
3.3 Инсталляция
Для установки программы на компьютер, необходимо скопировать всё содержимое каталога с программой.
ЗАКЛЮЧЕНИЕ
В ходе выполнения работы были закреплены знания по созданию и проектированию баз данных в среде Borland Delphi 7, а также приобретены практические навыки в создании программных приложений на данном языке программирования.
Результатом проделанной работы является база данных «Приёмная комиссия», выполняющая все необходимые задачи данного курсового проекта.
ПРИЛОЖЕНИЕ 1
Листинг программы
Файл fmAbiturU:
unit fmAbiturU;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls, Buttons, DBCtrls, Grids, DBGrids, Menus;
type
TfmAbitur = class(TForm)
Panel1: TPanel;
Panel2: TPanel;
Splitter1: TSplitter;
Panel3: TPanel;
DBGrid1: TDBGrid;
DBGrid2: TDBGrid;
DBNavigator1: TDBNavigator;
BitBtn1: TBitBtn;
Button1: TButton;
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
procedure Button1Click(Sender: TObject);
procedure N2Click(Sender: TObject);
procedure N4Click(Sender: TObject);
procedure N5Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
fmAbitur: TfmAbitur;
implementation
uses dmAbiturU, Unit1, Unit2, Unit3;
{$R *.dfm}
procedure TfmAbitur.Button1Click(Sender: TObject);
begin
Otch.Visible:=true;
Otch.Enabled:=true;
procedure TfmAbitur.N2Click(Sender: TObject);
fmAbitur.Close;
procedure TfmAbitur.N4Click(Sender: TObject);
Form2.Visible:=true;
Form2.Enabled:=true;
procedure TfmAbitur.N5Click(Sender: TObject);
Form3.Visible:=true;
Form3.Enabled:=true;
end.
Файл dmAbiturU:
unit dmAbiturU;
SysUtils, Classes, DB, DBTables;
TDM = class(TDataModule)
Database1: TDatabase;
Spec: TTable;
DataSource1: TDataSource;
Abitur: TTable;
DataSource2: TDataSource;
DM: TDM;
uses fmAbiturU;
Файл Unit1:
unit Unit1;
Dialogs, StdCtrls, RpCon, RpConDS, RpConBDE, RpDefine, RpRave, DB,
DBTables, Buttons;
TOtch = class(TForm)
Query1: TQuery;
RvProject1: TRvProject;
RvQueryConnection1: TRvQueryConnection;
Button2: TButton;
Label1: TLabel;
Label2: TLabel;
Query2: TQuery;
RvProject2: TRvProject;
RvQueryConnection2: TRvQueryConnection;
Button3: TButton;
Label3: TLabel;
Button4: TButton;
Query3: TQuery;
RvProject3: TRvProject;
RvQueryConnection3: TRvQueryConnection;
Label4: TLabel;
Button5: TButton;
Query4: TQuery;
RvProject4: TRvProject;
RvQueryConnection4: TRvQueryConnection;
Label5: TLabel;
Button6: TButton;
Query5: TQuery;
RvProject5: TRvProject;
RvQueryConnection5: TRvQueryConnection;
Label6: TLabel;
Label7: TLabel;
Button7: TButton;
Query6: TQuery;
RvProject6: TRvProject;
RvQueryConnection6: TRvQueryConnection;
Label8: TLabel;
Button8: TButton;
Query7: TQuery;
RvProject7: TRvProject;
RvQueryConnection7: TRvQueryConnection;
Label9: TLabel;
Button9: TButton;
Query8: TQuery;
RvProject8: TRvProject;
RvQueryConnection8: TRvQueryConnection;
procedure Button2Click(Sender: TObject);
procedure FormClose(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button5Click(Sender: TObject);
procedure Button6Click(Sender: TObject);
procedure Button7Click(Sender: TObject);
procedure Button8Click(Sender: TObject);
procedure Button9Click(Sender: TObject);
Otch: TOtch;
procedure TOtch.Button1Click(Sender: TObject);
RvProject1.Execute;
procedure TOtch.Button2Click(Sender: TObject);
Otch.close;
procedure TOtch.FormClose(Sender: TObject);
fmAbitur.enabled:=true;
procedure TOtch.Button3Click(Sender: TObject);
RvProject2.Execute;
procedure TOtch.Button4Click(Sender: TObject);
RvProject3.Execute;
procedure TOtch.Button5Click(Sender: TObject);
RvProject4.Execute;
procedure TOtch.Button6Click(Sender: TObject);
RvProject5.Execute;
procedure TOtch.Button7Click(Sender: TObject);
RvProject6.Execute;
procedure TOtch.Button8Click(Sender: TObject);
RvProject7.Execute;
procedure TOtch.Button9Click(Sender: TObject);
RvProject8.Execute;
Файл Unit2:
unit Unit2;
Dialogs, StdCtrls, Buttons;
TForm2 = class(TForm)
Form2: TForm2;
Файл Unit3:
unit Unit3;
TForm3 = class(TForm)
Form3: TForm3;
Список использованных источников
1. Культин Н.Б. Delphi в задачах и примерах. - СПб.: БХВ-Петербург, 2004. - 288 с.: ил.
2. Шкрыль А.А. Разработка клиент-серверных приложений в Delphi. - СПб.: БХВ-Петербург, 2006.
3. www.delphikingdom.com
Страницы: 1, 2