Програмний код модуля 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 - модуль довідника вулиць. За допомогою даного модуля можливо ввести в базу вулиць нову, раніше не записану вулицю, або при введенні використовувати вже занесені адреси.
Екранна форма модуля в режимі виконання програми зображена на мал.3.7.
Мал.3.7 Екранна форма модуля Vyl в режимі виконання програми
Екранна форма модуля в режимі конструювання зображена на мал. 3.8
Мал. 3.8 Екранна форма модуля Vyl в режимі конструювання
Програмна специфікація модуля Vyl наведена у таблиці 3.4
Таблиця 3.4
Поле для введення даних
Програмний код модуля Vyl наведено у Додатку 2.
Модуль Unit4 - модуль пошуку даних за прізвищем. За допомогою даного модуля можливо вручну ввести потрібне прізвище і натиснути кнопку Пошук.
Екранна форма модуля в режимі виконання програми зображена на мал.3.9.
Мал.3.9. Екранна форма Unit4 режимі виконання
Екранна форма модуля Unit4 в режимі конструювання зображена на рис. 3.10
Мал.3.10. Екранна форма Unit4 режимі конструювання
Програмна специфікація модуля Unit4 наведена у таблиці 3.5
Таблиця 3.5
Edit1: TEdit;
Button1: TButton;
Кнопка пошуку
DBGrid2: TDBGrid;
Таблиці відображення вмісту бази даних
procedure Button1Click(Sender: TObject);
Процедура пошуку
Оновлення таблиці
Програмний код модуля Unit4 наведено у Додатку 2.
Модуль Unit5 - модуль пошуку даних за адресою. За допомогою даного модуля можливо вручну ввести потрібне прізвище і натиснути кнопку Пошук.
Екранна форма модуля в режимі виконання програми зображена на мал.3.11.
Мал.3.11. Екранна форма Unit5 режимі виконання
Страницы: 1, 2, 3, 4, 5, 6