Процесс организации доступа
к данным в программе Delphi имеет следующий
алгоритм:
Выбрать с вкладки ADO компонент ADOConnection, в свойстве ConnectionString прописать путь к базе данных «Страховая компания».
Выбрать компонент ADOTable 3 раза, так как нужно отобразить 3 таблицы, в свойстве Connection необходимо указать ADOConnection1, а в свойстве TableName выбрать имя таблицы Виды страхования, Договоры
или Филиалы.
Третьим шагом с вкладки Data Access выбрать компонент источника данных DataSource, свойство DataSet меняем на ADOTable1 (нужная таблица).
Для непосредственного отображения
таблицы необходимо выбрать компонент
BDGrid и свойству DataSource присвоить DataSource1.
В завершении у компонента ADOTable1 меняем значение свойства Active на True - для отображения таблицы.
Рисунок 4 – Организация
доступа к БД «Страховая компания»
2.3 Создание прикладного
пользовательского интерфейса
Интерфейс — совокупность возможностей
взаимодействия двух систем, устройств
или программ, определённая их характеристиками,
характеристиками соединения, сигналов
обмена и т. п. Совокупность унифицированных
технических и программных средств и правил
(описаний, соглашений, протоколов), обеспечивающих
взаимодействие устройств или программ
в вычислительной системе или сопряжение
между системами.
Интерфейс пользователя, он
же пользовательский интерфейс — разновидность интерфейсов, в котором одна
сторона представлена человеком (пользователем),
другая — машиной/устройством. Представляет
собой совокупность средств и методов,
при помощи которых пользователь взаимодействует
с различными, чаще всего сложными, машинами,
устройствами и аппаратурой.3
Delphi 7 позволяет создавать различные
виды пользовательского интерфейса. Можно
организовать многостраничные блокноты.
В этом случае на форме будет располагаться
множество вкладок, каждая из которых
отображает нужную информацию. Можно создать
различные формы, переход к которым будет
осуществляться с помощью пунктов меню
или кнопок.
Для построения пользовательского
интерфейса был выбран тип интерфейса
с главной и подчиненными формами. Главная
форма программы содержит в себе только
меню, при помощи которого можно перейти
на другие формы. Выбрав меню «Таблицы»
можно перейти на какую-либо подчиненную
форму, содержащую таблицу Виды страхования,
Договоры или Филиалы. Нажав в меню на
«Выход» программа завершит свою работу.
Процесс создания пользовательского
интерфейса в программе Delphi включает следующие
компоненты:
- Для вставки картинки на форму
необходимо взять с вкладки Additional компонент Image. В Object Inspector этого компонента установить свойство Align = AlClient (чтобы картинка была во всю форму), затем в свойстве Picture выбрать свою картинку, затем свойство Stretch = true (чтобы подогнать размер под форму);
Для того чтобы создать главное
меню программы необходимо на форму поместить
компонент MainMenu;
Для того, чтобы при нажатии на кнопку меню осуществлялся переход на требуемую форму в обработчик события пишется следующий код: «Form2.Show;»;
Для перехода с одной подчинённой
формы на другую необходимо также в обработчик события ввести код перехода на другую форму, добавив к коду строку: «Form2.Close;».
Этап создания прикладного
пользовательского интерфейса является
важной составляющей при разработке информационной
системы, т.к. программа разрабатывается
для обеспечения работы пользователя,
т.е. для того, чтобы он, с помощью компьютерной
программы, быстрее, надёжнее и качественнее
решал свои производственные задачи. Интерфейс
дает пользователю понятность, наглядность
работы с АИС.
В результате проведенной работы
создан пользовательский интерфейс к
информационной системе «Страховая компания»,
в связи с чем можно переходить к следующему
этапу разработки информационной системы.
2.4 Формирование
запросов и отчетов
2.4.1 Формирование
запросов
При работе с таблицами можно
в любой момент выбрать из базы данных
необходимую информацию с помощью запросов.
Запрос – это средство выбора
необходимой информации из базы данных.
Запрос строится на основе одной или нескольких
взаимосвязанных таблиц, позволяя комбинировать
содержащуюся в них информацию. Запрос позволяет выбрать необходимые
данные из одной или нескольких взаимосвязанных
таблиц, произвести вычисления и получить
результат в виде виртуальной таблицы.
Полученная таблица может использоваться
в качестве источника данных в следующих
запросах, формах, отчетах, страницах доступа
к данным. Через запрос можно производить
обновление данных в таблицах, добавление
и удаление записей.4
Для организации запроса в Delphi необходимо
на форму поместить следующие компоненты:
- ADOQuery (в свойстве ConnectionString прописать путь к базе данных «Страховая компания»);
- DataSource (в свойстве DataSet поставить значение ADOQuery1);
- ListBox (необходимо открыть окно свойства Items и прописать нужные запросы:
SELECT COUNT(*) AS Количество договоров FROM Договоры;
SELECT AVG(Страховая сумма) AS Средняя_страховая_сумма
FROM Договоры;
SELECT Наименование FROM Виды_страхования
WHERE Наименование LIKE ‘С%’;
Запрос также добавить в свойство SQL компонента
ADOQuery1.
- Edit; в обработчике событий записать следующий код Edit1.Text:=ListBox1.Items[ListBox1.ItemIndex];
- DBGrid (в свойстве DataSource ставим значение равным DataSource1);
- Button (в кнопке прописываем код:
ADOQuery1.SQL.Text:=Edit1.Text;
try
ADOQuery1.Active:=True;
ADOQuery1.ExecSQL;
except
showmessage('Ошибка выполнения запроса!');
end.
Первый запрос выводит количество договоров.
Второй запрос показывает среднюю страховую
сумму. Третий запрос выводит наименования
начинающиеся на «С».
В результате проведенной работы сформированы
запросы к базе данных «Страховая компания».
2.4.2 Формирование
отчетов
Отчет – это форматированное представление
данных, которое выводится на экран, в
печать или файл. Они позволяют извлечь
из базы нужные сведения и представить
их в виде, удобном для восприятия, а также
предоставляют широкие возможности для
обобщения и анализа данных.5
Для организации отчета в Delphi необходимо
на форму поместить следующие компоненты:
- Выбрать с вкладки ADO компонент ADOConnection, в свойстве ConnectionString прописать путь к базе данных «Страховая компания».
- ADOTable1 (в свойстве Connection выбрать компонент ADOConnection1, в свойстве TableName выбрать наименование нужной таблицы,
свойство Active изменить на True);
- TQuickRep с вкладки QReport (в свойстве DataSet значение ADOTable1);
- TQRBand (свойство BandType установить значение rbTitle); на QRBand1 установить TQRLabel(в свойство Caption прописать заголовок отчёта);
- TQRBand (в свойстве BandType установить значение rbDetail); на полосе QRBand2 установить столько компонентов TQRDBText сколько полей таблицы нужно отобразить
в отчёте. Связать эти компоненты с полями
начальных данных – Код вида страхования,
Наименование. Для этого в свойстве DataSet каждого
компонента QRDBText установить значение ADOTable, а в свойство DataField имя соответствующего поля;
- TQRBand (в свойстве BandType установить значение rbColumnHeader); на полосе QRBand3 установить компоненты TQRLabel соответственно заголовкам полей;
- TQRBand (в свойстве BandType установить значение rbPageHeader, а свойство Frame.DrawTop сделать равным True);
- TQRBand (в свойстве BandType установить значение rbPageFooter, а свойство Frame.DrawBottom сделать равным True);
- В компоненте QRBand5 установит 2 компонента TQRSysData(в свойстве Data первого из них установить значение qrsDate, второго - qrsPageNumber).
В результате проведенной работы сформированы отчеты к базе
данных «Страховая компания».
Реализация информационной
системы успешно завершена. Разработка
информационной системы позволила создать
программный продукт для базы данных «Страховая
компания».
ЗАКЛЮЧЕНИЕ
Написав курсовую работу, можно
сделать следующий вывод, что автоматизированная
информационная система должна выполнять
сбор данных, заполнять все необходимые
справочники, документы, отчеты и отбор
в базе данных, а так же следить за тем,
чтобы введенные данные были точны и правильно
оформлены.
АИС, на сегодняшний день, стали
не просто средством оптимизации внутренних
процессов организации, а насущной необходимостью
в условиях жесткой конкуренции. Именно
автоматизация системы дает новые возможности
любой организации по ускорению работы,
позволяет опередить конкурентов при
принятии как оперативных, так и стратегических
решений.
Созданная информационная система
«Страховая компания» может свободно
применяться в практических целях, как
в небольших офисах, организациях так
и на предприятиях. Информационная система
позволяет отслеживать информацию о расходах
в организации: кем были произведены расходы,
для какого отдела, точная дата и сумма
расхода.
Готовый программный
продукт также может легко использоваться
в других сферах деятельности.
Все поставленные задачи решены:
- проанализировать предметную
область;
- определены назначение и функции ИС;
- спроектирована база данных
«Страховая компания»;
- реализовать базу данных в среде MS Access;
- осуществить доступ к данным;
- разработать прикладную программу доступа к базе данных в среде Delphi;
- оформлена курсовая работа в соответствии
с заданными требованиями.
Цель курсовой работы достигнута
– создана информационная система «Страховая
компания».
Использование информационной
системы "Страховая компания" позволит
повысить качество обслуживания клиентов,
что даст страховой компании преимущества
перед конкурентами на рынке страховых
услуг. А так же использование прикладного
программного продукта значительно сократит
объем ручного рутинного труда при подготовке
администраторами отчетных документов.
СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ
- Статья – Автоматизированная
информационная система [Электронный ресурс],http://gendocs.ru/v32574/%D1%80
- Статья – СУБД Access [Электронный ресурс], http://rusio.net/staroe/access.php
- Статья – Интерфейс пользователя [Электронный ресурс], http://ru.wikipedia.org/wiki/%D0%98%D0%BD%D1
- Статья – Создание запросов [Электронный ресурс], http://www.lessons-tva.info/edu/e-inf2/m2t4_4.html
- Статья – Создание отчёта [Электронный ресурс], http://dpivi.ru/128-5-sozdanie-otcheta-kak-obekta-bazy-dannyh.html
1 Статья – Автоматизированная
информационная система [Электронный
ресурс],http://gendocs.ru/v32574/%D1%80
2 Статья – СУБД Access [Электронный
ресурс], http://rusio.net/staroe/access.php
3 Статья – Интерфейс пользователя
[Электронный ресурс], http://ru.wikipedia.org/ wiki/%D0%98%D0%BD%D1
4 Статья – Создание запросов
[Электронный ресурс], http://www.lessons-tva.info/edu/e-inf2/m2t4_4.html
5 Статья – Создание отчёта [Электронный
ресурс], http://dpivi.ru/128-5-sozdanie-otcheta-kak-obekta-bazy-dannyh.html