Система "Багетная мастерская" состоит из следующих модулей:
модуль "MainUnit. pas" - главная форма программы (таблица 5.1);
модуль "SostavProductUnit. pas" - форма определения состава изделия (таблица 5.2);
модуль "SkladKomplektUnit. pas" - форма ведения складского учета (таблица 5.3);
модуль "MasterskayaKomplektUnit. pas" - форма ведения учета запасов комплектующих в мастерской (таблица 5.4);
модуль "KlientsUnit. pas" - форма ведения клиентского учета (таблица 5.5);
модуль "EdIzmUnit. pas" - справочник единиц измерения (таблица 5.6);
модуль "ALLKomplektUnit. pas" - справочник по комплектующим и материалам (таблица 5.7);
модуль "BagetKomplektUnit. pas" - справочник багета (таблица 5.8);
модуль "SelectDateUnit. pas" - форма выбора промежутка дат в запросах;
модуль "SplashUnit. pas" - заставка программы;
модуль "PrintZakazUnit. pas" - форма распечатки бланка;
модуль "PassFirstUnit. pas" - форма авторизации при запуске программы;
модуль "ChangePassUnit. pas" - форма изменения пароля доступа;
модуль "DMReportUnit. pas" - содержит компоненты соединения с таблицами базы данных для составления запросов для отчетов;
модуль "AboutUnit. pas" - форма справочной информации о программе;
модуль "DataUnit. pas" - содержит компоненты для связи с таблицами базы данных.
Вышеописанные модули имеют следующую структуру:
UNIT Имя модуля
INTERFACE {Начало раздела объявлений}
USES{Используемые при объявлениях модули}
CONST{Блок объявления библиотечных констант}
TYPE{Блок объявления библиотечных типов}
VAR{Блок объявления библиотечных переменных}
IMPLEMENTATION{Начало раздела реализации}
USES{Используемые при реализации модули}
CONST{Блок объявления внутренних констант}
TYPE{Блок объявления внутренних типов}
VAR{Блок объявления внутренних переменных}
LABEL{Блок объявления внутренних меток}
INITIALIZATION{Начало раздела инициализации}
FINALIZATION{Начало раздела финальной части}
END.
Более подробное описание модулей представлено в таблицах 5.1 - 5.8.
Таблица 5.1 - Структура модуля Main
| Названия процедур
| Назначение
| | |
| | |
| 1
| 2
| | |
| CreateALLEdIzmForm
| Динамически создаёт форму "Единицы измерения"
| | |
| EdIzmActExecute
| Показать форму "Ед. изм. "
| | |
| CreateALLKlientsForm
| Динамически создаёт форму "Клиенты"
| | |
| KlientsActExecute
| Показать форму "Клиенты"
| | |
| CreateBagetKomplektForm
| Динамически создаёт форму "Материалы - багеты"
| | |
| CreateAllKomplektForm
| Динамически создаёт форму "Материалы - Комплектующие" и "Материалы - Разное"
| | |
| ActMaterBagetExecute
| Показать форму "Материалы - багеты"
| | |
| ActMaterKomplektExecute
| Показать форму "Материалы - Комплектующие"
| | |
| ActMaterRaznoeExecute
| Показать форму "Материалы - Разное"
| | |
| CreateAllMasterskayaKomplektForm
| Динамически создаёт форму для мастерской
| | |
| ActSkladKomplektExecute
| Показать форму "Склад - комплектующие"
| | |
| ActSkladRaznoeExecute
| Показать форму "Склад - разное"
| | |
| ActSkladBagetsExecute
| Показать форму "Склад - багеты"
| | |
| ActMaterRaznoeExecute
| Показать форму "Материалы - Разное"
| | |
| ExitActExecute
| Выход из программы
| | |
| DBEditItogSRabotoiKeyPress
| Обработчик ввода данных
| |
| FormShow
| Устанавливает начальное состояние элементов формы
| |
| DBEditDataPriemaExit
| Проверяет корректность ввода даты
| |
| BBSortASCClick
| Сортировка записей
| |
| ButtonSostavClick
| Открывает форму "состав изделия"
| |
| FormCloseQuery
| Обработчик выхода из программы
| |
| ActPrintOptionExecute
| Настройка параметров принтера
| |
| ActPrintExecute
| Распечатка заказа
| |
| Act_Zak_EditExecute
| Редактирование заказа
| |
| Act_Zak_DelExecute
| Удаление заказа
| |
| Act_Zak_SaveExecute
| Сохранить заказ
| |
| Act_Zak_CancelExecute
| Отмена изменений в заказе
| |
| Act_Izd_AddExecute
| Добавить изделие
| |
| Act_Izd_EditExecute
| Редактировать изделие
| |
| Act_Izd_DelExecute
| Удалить изделие
| |
| Act_Izd_SaveExecute
| Сохранить изменения в изделии
| |
| Act_Izd_CancelExecute
| Отменить изменения в изделии
| |
| Act_Izd_SostavExecute
| Определить состав изделия
| |
| Act_Zak_RashitatExecute
| Рассчитать заказ
| |
| Act_R_OstatkiExecute
| Выполняет отчёт "остатки материалов в мастерской"
| |
| FormCreate
| Обработчик создания формы
| |
| Act_R_PriceListExecute
| Выполняет отчёт "прайс-лист"
| |
| CreateSelectDateForm
| Создаёт форму выбора для отчёта начальной и конечной даты
| |
| Act_R_SummaZakazovExecute
| Выполняет отчёт "сумма заказов за период"
| |
| Act_R_ZakaziKDateExecute
| Выполняет отчёт "Заказы к дате"
| |
| Act_R_ProdazhiMaterExecute
| Выполняет отчёт "продажи материалов за период"
| |
| ActArchivExecute
| Открывает диалог "Файл - архивация базы"
| |
| Act_Zak_ClearExecute
| Очистить таблицу "Заказы"
| |
| Act_Zash_ChangePassExecute
| Открывает форму "Изменить пароль"
| |
| Act_Zak_AddExecute
| Выполняет пункт меню "Заказы" "добавить"
| |
| Act_AboutExecute
| Динамически создаёт форму "О программе"
| |
| Act_HelpExecute
| Открывает файл справки
| |
| | | | | |
Таблица 5.2 - Структура модуля SostavProductUnit. pas
| Названия процедур
| Назначение
| |
|
| 1
| 2
| |
| BBtnBagetsAddClick
| Обработчик кнопки "багеты - добавить"
| |
| BBtnBagetsEditClick
| Обработчик кнопки "багеты - редактировать"
| |
| BBtnBagetsDelClick
| Обработчик кнопки "багеты - удалить"
| |
| BBtnBagetsSaveClick
| Обработчик кнопки "багеты - сохранить"
| |
| BBtnBagetsCancelClick
| Обработчик кнопки "багеты - отмена"
| |
| FormShow
| Устанавливает начальное состояние элементов формы
| |
| FormCloseQuery
| Обработчик выхода из программы
| |
| BBtnRaznoeAddClick
| Обработчик кнопки "Разное - Добавить"
| |
| BBtnRaznoeEditClick
| Обработчик кнопки "Разное - Редактировать"
| |
| BBtnRaznoeDelClick
| Обработчик кнопки "Разное - Удалить"
| |
| BBtnRaznoeSaveClick
| Обработчик кнопки "Разное - Сохранить"
| |
| BBtnRaznoeCancelClick
| Обработчик кнопки "Разное - Отмена"
| |
| DBLCBLRazkomplektDropDown
| Обработчик списка "Разное - наименование детали"
| |
| BBtnKomplAddClick
| Обработчик кнопки "Комплектующие - Добавить"
| |
| BBtnKomplEditClick
| Обработчик кнопки "Комплектующие - Редактировать"
| |
| BBtnKomplDelClick
| Обработчик кнопки "Комплектующие - Удалить"
| |
| BBtnKomplSaveClick
| Обработчик кнопки "Комплектующие - Сохранить"
| |
| BBtnKomplCancelClick
| Обработчик кнопки "Комплектующие - Отмена"
| |
| DBLCBLKompl_komplektDropDown
| Обработчик списка "Комплектующие - наименование детали"
| |
| DBEditShirinaKeyPress
| Проверяет корректность ввода данных
| |
| SpeedButton1Click
| Вызов калькулятора
| |
| DBNavigatorKomplClick
| Обработчик навигатора таблицы "Комплектующие”
| |
Таблица 5.3 - Структура модуля SkladKomplektUnit. pas
| Названия процедур
| Назначение
|
| BBtnAddClick
| Обработчик кнопки "добавить"
|
| BBtnEditClick
| Обработчик кнопки "редактировать"
|
| BBtnDeleteClick
| Обработчик кнопки "удалить"
|
| BBtnSaveClick
| Обработчик кнопки "сохранить"
|
| BBtnCancelClick
| Обработчик кнопки "отмена"
|
| FormCloseQuery
| Обработчик выхода из программы
|
| FormShow
| Устанавливает начальное состояние элементов формы
|
| BBtnClearClick
| Обработчик кнопки "Очистить"
|
| DBEditZakupCenaKeyPress
| Проверяет корректность ввода данных
|
| DBEditDataExit
| Проверяет корректность ввода даты
|
| BBFindClick
| Обработчик кнопки "найти"
|
| BBSortASCClick
| Обработчик кнопки "сортировать по возрастанию"
|
| DBNavigatorSlaveClick
| Обработчик нажатия кнопки навигатора
|
| BBSortDESCClick
| Обработчик кнопки "сортировать по убыванию"
|
| BBSpisanieClick
| Обработчик кнопки "списать"
|
| BBSpisanieSaveClick
| Обработчик кнопки "Списание - сохранить"
|
| BBSpisanieClearClick
| Обработчик кнопки "Списание - отменить"
|
| DBLComboBoxKomplektDropDown
| Обработчик списка "Наименование детали"
|
| BBtnClearTableClick
| Обработчик кнопки "Очистить"
|
Таблица 5.4 - Структура модуля MasterskayaKomplektUnit. pas
| Названия процедур
| Назначение
| |
|
| BBtnAddClick
| Обработчик кнопки "добавить"
| |
| BBtnEditClick
| Обработчик кнопки "редактировать"
| |
| BBtnDeleteClick
| Обработчик кнопки "удалить"
| |
| BBtnSaveClick
| Обработчик кнопки "сохранить"
| |
| BBtnCancelClick
| Обработчик кнопки "отмена"
| |
| FormCloseQuery
| Обработчик выхода из программы
| |
| FormShow
| Устанавливает начальное состояние элементов формы
| |
| BBtnClearClick
| Обработчик кнопки "Очистить"
| |
| DBEditRoznCenaKeyPress
| Проверяет корректность ввода данных
| |
| DBLComboBoxKomplektDropDown
| Обработчик списка "Наименование детали"
| |
Таблица 5.5 - Структура модуля KlientsUnit. pas
| Названия
процедур
| Назначение
| |
|
| BBtnAddClick
| Обработчик кнопки "добавить"
| |
| BBtnEditClick
| Обработчик кнопки "редактировать"
| |
| BBtnDeleteClick
| Обработчик кнопки "удалить"
| |
| BBtnSaveClick
| Обработчик кнопки "сохранить"
| |
| BBtnCancelClick
| Обработчик кнопки "отмена"
| |
| FormCloseQuery
| Обработчик выхода из программы
| |
| FormShow
| Устанавливает начальное состояние элементов формы
| |
| DBEdit3KeyPress
| Проверяет корректность ввода данных
| |
| BBtnClearClick
| Обработчик кнопки "Очистить"
| |
| EditFindChange
| Обработчик поля ввода "Поиск по ФИО"
| |
Таблица 5.6 - Структура модуля EdIzmUnit. pas
| Названия
процедур
| Назначение
| |
|
| BBtnAddClick
| Обработчик кнопки "добавить"
| |
| BBtnEditClick
| Обработчик кнопки "редактировать"
| |
| BBtnDeleteClick
| Обработчик кнопки "удалить"
| |
| BBtnSaveClick
| Обработчик кнопки "сохранить"
| |
| BBtnCancelClick
| Обработчик кнопки "отмена"
| |
| FormCloseQuery
| Обработчик выхода из программы
| |
| FormShow
| Устанавливает начальное состояние элементов формы
| |
| BBtnClearClick
| Обработчик кнопки "Очистить"
| |
Таблица 5.7 - Структура модуля ALLKomplektUnit. pas
| Названия
процедур
| Назначение
| |
|
| BBtnAddClick
| Обработчик кнопки "добавить"
| |
| BBtnEditClick
| Обработчик кнопки "редактировать"
| |
| BBtnDeleteClick
| Обработчик кнопки "удалить"
| |
| BBtnSaveClick
| Обработчик кнопки "сохранить"
| |
| BBtnCancelClick
| Обработчик кнопки "отмена"
| |
| FormCloseQuery
| Обработчик выхода из программы
| |
| FormShow
| Устанавливает начальное состояние элементов формы
| |
| BBtnClearClick
| Обработчик кнопки "Очистить"
| |
| EditFindChange
| Обработчик поля ввода "Поиск по наим. комплектующих"
| |
| BBtnMainAddClick
| Обработчик кнопки "добавить тип детали"
| |
| BBtnMainEditClick
| Обработчик кнопки " редактировать тип детали"
| |
| BBtnCancelClick
| Обработчик кнопки "отмена"
| |
| FormCloseQuery
| Обработчик выхода из программы
| |
| FormShow
| Устанавливает начальное состояние элементов формы
| |
| BBtnMainSaveClick
| Обработчик кнопки "сохранить изменения в типе детали"
| |
| BBtnMainDelClick
| Обработчик кнопки " удалить изменения в типе детали"
| |
| BBtnMainCancelClick
| Обработчик кнопки " отменить изменения в типе детали"
| |
| DBEditMaterKoefKeyPress
| Проверяет корректность ввода данных
| |
Таблица 5.8 - Структура модуля BagetKomplektUnit. pas
| Названия
процедур
| Назначение
| |
|
| BBtnAddClick
| Обработчик кнопки "добавить"
| |
| BBtnEditClick
| Обработчик кнопки "редактировать"
| |
| BBtnDeleteClick
| Обработчик кнопки "удалить"
| |
| BBtnSaveClick
| Обработчик кнопки "сохранить"
| |
| BBtnCancelClick
| Обработчик кнопки "отмена"
| |
| FormCloseQuery
| Обработчик выхода из программы
| |
| FormShow
| Устанавливает начальное состояние элементов формы
| |
| BBtnClearClick
| Обработчик кнопки "Очистить"
| |
| EditFindChange
| Обработчик поля ввода "Поиск по наим. комплектующих"
| |
| BBtnMainAddClick
| Обработчик кнопки "добавить тип детали"
| |
| BBtnMainEditClick
| Обработчик кнопки " редактировать тип детали"
| |
| BBtnMainSaveClick
| Обработчик кнопки "сохранить изменения в типе детали"
| |
| BBtnMainDelClick
| Обработчик кнопки " удалить изменения в типе детали"
| |
| BBtnMainCancelClick
| Обработчик кнопки " отменить изменения в типе детали"
| |
| DBEditMaterKoefKeyPress
| Проверяет корректность ввода данных
| |