Расчёт заработной платы в среде программирования delphi 7

Содержание

 

Введение………………………………………………………………………….2

1. Инфологическая  модель………………………………………………………4

1.2 Информационные  объекты и атрибуты…………………………………….4

1.3Требование  к функциональным характеристикам………………………….4

2.Создание  проекта Delphi……………………………………………………….8

2.1Описание компонентов для нахождения графических компонентов……...8

3. Организация  доступа к базе данных из  Delphi………………………………9

4 Разработка интерфейса ввода справочной информации……………………13

5 Создание  отчета………………………………………………………………..16

Заключение…………………………………………………………………….…23

Список использованной литературы…………………………………………...24

Приложение 1. Программный код и формы…………………………………...25

Приложение 2. Программный код для отображения оперативной информации «Чеки» …………………………………………………………………………...27

Приложение 2. Программный код для отображения оперативной информации «Покупки»………………….……………………………………………….……30

Руководство пользователя………………………………………………………31

 

Введение

 

В настоящее время среди разработчиков базы данных (БД) большой популярностью пользуется реляционная СУБД ACCESS, входящая в состав пакета  Microsoft Office 2003. Дружественный интерфейс  и простота настройки, эффективные средства создания таблиц, форм, запросов, интеграция с другими приложениями пакета, средства организации работы с базами данных и защита информации - вот далеко не полный перечень достоинств этого приложения.

Основные функции СУБД – это описание структуры базы данных, обработка данных и управление данными.

База данных – это совокупность сведений о реальных объектах, процессах, событиях или явлениях, относящихся к определённой теме или задаче, организованная таким образом, чтобы обеспечить удобное представление этой совокупности, как в целом, так и любой её части. Реляционная база данных представляет собой множество взаимосвязанных таблиц, каждая из которых содержит информацию об объектах определённого типа. Каждая строка таблицы содержит данные об одном объекте (например, клиенте, автомобиле, документе), а столбцы таблицы содержат различные характеристики этих объектов – атрибуты (например, наименования и адреса клиентов, марки и цены автомобилей). Строки таблицы называются записями, все записи имеют одинаковую структуру – они состоят из полей, в которых хранятся атрибуты объекта. Каждое поле в записи содержит одну характеристику объекта и имеет строго определённый тип данных (например, текстовая строка, число, дата). Все записи имеют одни и те же поля, только в них содержатся разные значения атрибутов.

Обьект исследования – касса продуктового магазина.

Цель данной курсовой работы – создать базу данных в СУБД ACCESS, разработать программное обеспечение в среде программирования Delphi.

 

Задачи:

–  необходимо создать базу данных, которая хранила бы  информацию о товарах, кассирах, покупках и чеках.

– реализовать в среде программирования Delphi

– разработанное программное обеспечение должно позволять просматривать, добавлять, удалять в базу информацию о новых товарах, кассирах, покупках, чеках.

Инструмент создания базы данных:

1. В качестве инструмента создания базы данных и сопутствующего программного обеспечения используется Delphi 7 – императивный, структурированный, объектно-ориентированный язык программирования.  
   Инфологическая модель

1.2 Информационные объекты и их атрибуты:

1.3 Требования  к функциональным характеристикам

 

Первым этапом и самым главным этапом в процессе проектирования и создания базы данных, является разработка инфологической модели.

Цель инфологического моделирования – обеспечение наиболее естественных для человека способов сбора и представления той информации, которую предполагается хранить в создаваемой базе данных. Основными конструктивными элементами инфологических моделей являются сущности, связи между ними и их свойства.

Ключ – минимальный набор атрибутов, по значениям которых можно однозначно найти требуемый экземпляр сущности. Минимальность означает, что исключение из набора любого атрибута не позволяет идентифицировать сущность по оставшимся.

Связь – ассоциирование двух или более сущностей. Если бы назначением базы данных было только хранение отдельных, не связанных между собой данных, то ее структура могла бы быть очень простой. Однако одно из основных требований к организации базы данных – это обеспечение

возможности отыскания одних сущностей по значениям других.

Реляционная база данных – это совокупность отношений, содержащих всю информацию, которая должна храниться в БД. Однако пользователи могут воспринимать такую базу данных как совокупность таблиц.

Для  базы данных продуктового магазина реляционная модель будет выглядеть так (Рисунок 1):

 

Рисунок 1 – Реляционная модель базы данных кассира продуктового магазина

 

База данных «Рабочее место кассира» должна выполнять следующие функции:

– хранение информации о кассирах, товарах;

– просмотр информации;

– добавление данных в имеющийся список;

– удаление информации.

 

Оперативная информация

 

Таблица «Чеки» состоит из:                              

  – код чека;

– дата покупки;

– код кассира;

– стоимость покупки.

Таблица «Покупки»

– код покупки;

– код чека;

– код кассира;

– код товара;

– код единицы измерения;

– код вида;

– количество;

– стоимость.

 

 Справочная информация:

 

Таблица «Товар»

– код товара;

– наименование товара;

– срок годности;

– цена;

– код единицы;

– код вида.

Таблица «Вид товара»

– код вида;

– наименование вида.

Таблица «единицы измерения»

– код единицы;

– наименование.

Таблица «кассиры»

– код кассира;

– ФИО.

 

 

2. Создание проекта в Delphi.

2.1 Описание компонентов для реализации графического

интерфейса

 

Интерфейс приложений составляет компоненты, которые разработчик выбирает в палитре компонентов и размещает их на форме.

TMainMenu – предназначен для добавления к программе главного меню, элемента без которого не обходится ни одно из приложений для Windows. Компоненты невизуальный, то есть, в работающей программе не будет виден.

Форма – это диалоговое окно, через которое осуществляется интерфейс пользователя. Формы используются для различных целей:

– для ввода данных в таблицу;

– как кнопочная форма для открытия других форм или отчётов;

– как специальное диалоговое окно для выбора, предварительного просмотра и печати нужного отчёта.

Большая часть данных, представленных в форме, берётся из таблицы или запроса. Другая информация, не связанная ни с таблицей, ни с запросом, хранится в макете формы.

Для создания связи между формой и записями таблицы, являющейся источником данных формы, используются графические объекты, называемые элементами управления. Чаще всего для отображения и ввода данных используется поле.

Элемент «TButton»предназначен для отправки данных формы на сервер. Является компонентом для выдачи команд на выполнение определенных действий.

Элемент «DataSourсe» - представляется для связи сетки отображения данных с самой БД.

Элемент «Dbgrid» - предназначен для отображение данных БД и сортировки колонок.

Рисунок 2 – создание главного  меню

 

3. Организация доступа к базе данных из Delphi.

ADO (Active Data Obiect) – высокоуровневый компонент технологии  доступа к данным от Microsoft.

1. Для доступа к базе данных создадим отдельный модуль.

2. Для доступа к базе нужен компонент TADOConnection, а для обращения к  справочнику специальностей – компонент TADOTable.

3.Разместим их на нашем модуле.

4. TADOConnection предназначен  для подключение БД через провайдер. В нашем случае это Microsoft Jet 4.0 OLE DB Provider нажмем далее

5. Теперь для первого пункта 1. Выберите или введите имя базы данных нажмите кнопку выбора и укажите файл Kass.mdb, расположенный в вашей папке и нажмите Открыть

6.После этого, для проверки, нажмите Проверить Соединение, должно появиться сообщение Проверка соединения выполнена.

7. Нажмите ОК в текущем окне, и в следующем за ним.

8. В окне Object Inspector для компонента ADOConnection1 установите свойство LoginPrompt в False, а затем свойство Connected – в True. Теперь подключаем таблицу Кассир и переименовываем компонент доступа к таблице для удобства.

В основном окне выберем компонент ADOTable1, а в окне Object Inspector последовательно установим следующие свойства:

– Name – tbKass

– Connection – ADOConnection1

– TableName – Kassir

Далее необходимо  указать поля, с которыми будет работать компонент tbKass. В окне Structure нажмите правую кнопку на элементе Fields. Сохраните проект полностью. Аналогично добавляем Вид кассира, товар, единицы измерения, покупки, чеки.

 

 

 

 

 

 

Рисунок 3 – организация доступа к базе данных через ADOConnection и ADOTable

 

4. Разработка интерфейса ввода справочника кассиров

Справочники удобнее всего вести в виде таблицы. Для реализации такого подхода создается форма с соответствующими элементами.

Для того, чтобы форма показывалась только по вызову из главного меню, перейдем в параметры проекта: Project -> Options. Теперь необходимо перевести форму из состояния Auto-сreate в Available . Для того, чтобы вызвать справочник из меню, перейдем в основном окне в модуль frmMain и в режиме Code (закладка внизу основного окна) добавим после implementation строку Uses frmKassir, вернутся обратно в режим Design. В левом верхнем окне Structure раскроем полностью главное меню (MainMenu1) и дважды щелкнем на пункте Кассиры.

И в открывшемся окне кода после строки begin добавляем TfmKassir.Create(Application).

Добавляем на форму кнопки, TBGrid, datasource, и указываем свойства

        

         – для Button1:

Caption – Новая запись

Font – Style – fsBold – True

Name –btNewRecord

         

          – для Button2:

Caption – Удалить запись

Font – Style – fsBold – True

Name – btDelRecord

         

         – для Button3:

Caption – Закрыть

Font – Style – fsBold – True

Name – btClose

 

 – для DataSource1:

DataSet – mdKassirDB.tbKass

DataSet – Active – True

 

– для DBGrid1:

DataSource – DataSource1

Options – dgColumnResize – False

 

Добавление новой записи в справочник кассира

mdKassirDB.tbKass.Append;

DBGrid1.SetFocus;

Таким же образом добавьте обработчик события нажатия кнопки btDelRecord («Удалить запись»). В поле кода напишите:

Удаление записи из справочника кассира

if dbgrid1.DataSource.DataSet.RecordCount<>0 then begin

mdUspDB.tbKassirDB.Delete;

mdUspDB.tbKassirDB.Refresh;

end;

Для btClose («Закрыть») напишите следующий обработчик события нажатия кнопки:

Закрытие формы справочника кассира

Close;

Теперь добавьте обработчики событий открытия и закрытия формы. При открытии нам нужно, чтобы пользователь сразу попадал на таблицу. Поэтому, выберите в режиме Design всю форму fmKassir, щелкнув на заголовке формы в главном окне. Затем, в окне Object Inspector выберите вкладку Events, и для события OnActivate напишите обработчик:

Установка указателя сразу на таблицу специальностей

DBGrid1.SetFocus;

 

Для события OnClose напишите:

Разрешить полностью закрыть форму и высвободить память

  Action:=caFree;

 

Таблица «Кассиры» представлена на рисунке 4.

Рисунок 4– Таблица «Кассиры»

 

Аналогично создаем следующие таблицы.

Рисунок 5 – таблица «Вид товаров»

 

 

 

 

 

 

 

 

 

 

 

Рисунок 6 – таблица «Справочник товаров»

 

 

Рисунок 7 – таблица «Единицы измерения»

 

 

 

 

 

Отображение оперативной информации

 

 

Рисунок 8 – отображение оперативной информации «Чеки»

 

 

Рисунок 9 –таблица «Покупки»