46712 (607917), страница 2
Текст из файла (страница 2)
Рис. 3.1. Інформаційна модель системи
3.2. Модульна структура програмного засобу
Програма складається з набору програмних модулів, кожний з яких виконує одну чи декілька функцій. Модульна структура програми зображена на рис. 3.2. У таблиці 3.1. наведено призначення програмних модулів.
vyl
Unit9
Unit11
Unit10
pasp_st
Unit12
Unit7
Unit2
Unit4
Unit6
Unit5
Unit8
p_st
Мал. 3.2
Призначення програмних модулів Таблиця 3.1
| № | Позначення | Призначення |
| 1 | p_st | Головний модуль програми. Містить головну форму і забезпечує перехід з однієї форми на іншу. |
| 2 | vyl | Модуль довідника вулиць. |
| 3 | pasp_st | Модуль введення та редагування даних. |
| 4 | Unit9 | Модуль звіту «Картка паспортних даних». |
| 5 | Uni11 | Модуль для введення додаткових даних. |
| 6 | Uni10 | Модуль звіту «Довідка про прописку». |
| 7 | Unit12 | Модуль, який містить дані про вибувших. |
| 8 | Unit7 | Модуль, для вилучення вибувших. |
| 9 | Unit4 | Модуль, для пошуку за прізвищем. |
| 10 | Unit5 | Модуль, для пошуку за адресою. |
| 11 | Unit6 | Модуль, для відображення списку пенсіонерів. |
| 12 | Unit8 | Модуль звіту «Список пенсіонерів» |
| 13 | Unit2 | Модуль, який містить довідку про розробника. |
3.3 Опис програмних модулів
3.2.1 Модуль “P_st_”
Модуль P_st є головним модулем програми через який здійснюється зв’язок з іншими програмними модулями. Перехід на інші програмні модулі виконується з використанням системи меню. Екранна форма модуля в режимі виконання програми, з розкритим елементом меню зображена на рис.3.3.
Мал.3.3 Екранна форма модуля P_st в режимі виконання програми
Екранна форма модуля в режимі конструювання зображена на мал. 3.4
Мал. 3.4 Екранна форма модуля P_st в режимі конструювання
Програмна специфікація модуля P_st наведена у таблиці 3.2
Таблиця 3.2 Програмна специфікація модуля P_st
| Компонент програми | Позначення | Зміст | |||
| Стандартні модулі | Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, Menus; | Стандартні модулі, з якими встановлюється зв’язок | |||
| Візуальні компоненти | MainMenu1: TMainMenu; | Програмне меню, яке забезпечує перехід на інші програмні форми | |||
| N1: TMenuItem; | Пункт меню «Довідники» | ||||
| N2: TMenuItem; | Підпункт «Вулиці» пункту меню Довідники | ||||
| N3: TMenuItem; | Пункт меню «Операції» | ||||
| N4: TMenuItem; | Підпункт «Введення даних» пункту меню Операції | ||||
| N5: TMenuItem; | Пункт меню «Вибірка» | ||||
| N6: TMenuItem; | Підпункт «Вибувші» пункту меню Вибірка | ||||
| N7: TMenuItem; | Підпункт «Дані про вибувших» пункту меню Операції | ||||
| N8: TMenuItem; | Підпункт «Пошук» пункту меню Вибірка | ||||
| N9: TMenuItem; | Підпункт «Прізвище» підпункту Пошук меню Вибірка | ||||
| N10: TMenuItem; | Підпункт «Адреса» підпункту Пошук меню Вибірка | ||||
| N11: TMenuItem; | Підпункт «Пенсіонери» пункту меню Вибірка | ||||
| N12: TMenuItem; | Пункт меню «Довідка» | ||||
| N13: TMenuItem; | Підпункт «Про програму» пункту меню Довідка | ||||
| N14: TMenuItem; | Підпункт «Про автора» пункту меню Довідка | ||||
| Процедури | procedure N1Click(Sender: TObject); | Відкриваємо пункт меню «Довідники» | |||
| procedure N2Click(Sender: TObject); | Переходимо на форму довідника вулиць | ||||
| procedure N3Click(Sender: TObject); | Відкриваємо пункт меню «Операції» | ||||
| procedure N4Click(Sender: TObject); | Переходимо на форму введення даних | ||||
| procedure N5Click(Sender: TObject); | Відкриваємо пункт меню «Вибірка» | ||||
| procedure N6Click(Sender: TObject); | Переходимо на форму вилучення вибувших | ||||
| procedure N7Click(Sender: TObject | Переходимо на форму перегляду даних про вибувших | ||||
| procedure N8Click(Sender: TObject); | Відкриваємо підпункт меню «Пошук» | ||||
| procedure N9Click(Sender: TObject); | Переходимо на форму для пошуку по прізвищу | ||||
| procedure N10Click(Sender: TObject); | Переходимо на форму для пошуку за адресою | ||||
| procedure N11Click(Sender: TObject); | Переходимо на форму для відображення пенсіонерів | ||||
| procedure N12Click(Sender: TObject); | Відкриваємо пункт меню «Довідка» | ||||
| procedure N13Click(Sender: TObject); | Переходимо на форму для перегляду довідки про програму | ||||
| procedure N14Click(Sender: TObject); | Переходимо на форму для перегляду довідки про розробника | ||||
Програмний код модуля P_st наведено у Додатку 2.
Модуль pasp_st є одним з головних модулів тому що саме він підтримує введення нових даних в базу даних та видалення даних з бази даних. Введення виконується вручну з деяким використанням автоматизації процесу. Контроль за введенням даних частково лягає на користувача, а частково на комп’ютер. Також можна за допомогою цього модуля виконувати редагування даних. За допомогою даного модулю можна відобразити звіти «Картка паспортних даних» та «Довідка про прописку».
Екранна форма модуля в режимі виконання програми зображена на мал.3.5.
Мал.3.5. Екранна форма модуля pasp_st в режимі виконання програми
Екранна форма модуля pasp_st в режимі конструювання зображена на мал. 3.6.
Мал. 3.6 Екранна форма модуля pasp_st в режимі конструювання
Програмна специфікація модуля pasp_st наведена у таблиці 3.3
Таблиця 3.3 Програмна специфікація модуля pasp_st
| Компонент програми | Позначення | Зміст |
| Стандартні модулі | Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, DBCtrls, Grids, DBGrids, DBTables, Db, StdCtrls, Mask,DateUtils; | Стандартні модулі, з якими встановлюється зв’язок |
| Компоненти | Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label7: TLabel; Label8: TLabel; Label9: TLabel; Label10: TLabel; Label11: TLabel; Label12: TLabel; Label13: TLabel; Label14: TLabel; Label15: TLabel; Label16: TLabel; | Написи на формі |
| DBEdit1: TDBEdit; DBEdit2: TDBEdit; DBEdit3: TDBEdit; DBEdit4: TDBEdit; DBEdit5: TDBEdit; DBEdit10: TDBEdit; DBEdit11: TDBEdit; DBEdit9: TDBEdit; DBEdit6: TDBEdit; | Поля введення даних | |
| DBLookupComboBox1: TDBLookupComboBox; | Випливаючі списки даних з яких потрібно вибрати потрібне поле | |
| DBNavigator1: TDBNavigator; | Навігатор по базі даних | |
| DBImage1: TDBImage; | Об’єкт завантаження малюнка | |
| DBGrid1: TDBGrid; | Таблиці відображення вмісту бази данних | |
| BitBtn1: TBitBtn; BitBtn3: TBitBtn; BitBtn2: TBitBtn; | Кнопки виконання команд | |
| DBComboBox1: TDBComboBox; DBComboBox2: TDBComboBox; DBComboBox3: TDBComboBox; | Поле даних зі списком | |
| Процедури | procedure DBEdit4Change(Sender: TObject); | Процедура автоматичного розрахунку поля Вік |
| procedure BitBtn1Click(Sender: TObject); | Відкриває папку для загрузки фото | |
| procedure BitBtn2Click(Sender: TObject); | Відкриває звіт паспортних даних | |
| procedure FormCreate(Sender: TObject); | Активація форматів загрузки фото | |
| procedure Edit1Change(Sender: TObject); | Пошук по першим літерам прізвища | |
| procedure BitBtn3Click(Sender: TObject); | Відкриває звіт «Довідка про прописку» | |
| procedure FormActivate(Sender: TObject); | Курсор на перше поле введення | |
| procedure DBNavigator1Click(Sender: TObject; Button: TNavigateBtn); | Активація компонентів введення |
Програмний код модуля Pasp_st наведено у Додатку 2.
Модуль Vyl – модуль довідника вулиць. За допомогою даного модуля можливо ввести в базу вулиць нову, раніше не записану вулицю, або при введенні використовувати вже занесені адреси.












