46712 (607917), страница 3
Текст из файла (страница 3)
Екранна форма модуля в режимі виконання програми зображена на мал.3.7.
Мал.3.7 Екранна форма модуля Vyl в режимі виконання програми
Екранна форма модуля в режимі конструювання зображена на мал. 3.8
Мал. 3.8 Екранна форма модуля Vyl в режимі конструювання
Програмна специфікація модуля Vyl наведена у таблиці 3.4
Таблиця 3.4
| Компонент програми | Позначення | Зміст |
| Стандартні модулі | 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; | Написи на формі |
| DBEdit1: TDBEdit; | Поле для введення даних | |
| DBNavigator1: TDBNavigator; | Навігатор по базі даних | |
| DBImage1: TDBImage; | Об’єкт завантаження малюнка | |
| DBGrid1: TDBGrid; | Таблиці відображення вмісту бази данних | |
| DBComboBox1: TDBComboBox; | Поле даних зі списком |
Програмний код модуля Vyl наведено у Додатку 2.
Модуль Unit4 – модуль пошуку даних за прізвищем. За допомогою даного модуля можливо вручну ввести потрібне прізвище і натиснути кнопку Пошук.
Екранна форма модуля в режимі виконання програми зображена на мал.3.9.
Мал.3.9. Екранна форма Unit4 режимі виконання
Екранна форма модуля Unit4 в режимі конструювання зображена на рис. 3.10
Мал.3.10. Екранна форма Unit4 режимі конструювання
Програмна специфікація модуля Unit4 наведена у таблиці 3.5
Таблиця 3.5
| Компонент програми | Позначення | Зміст |
| Стандартні модулі | Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, DBCtrls, Grids, DBGrids, DBTables, Db, StdCtrls, Mask,DateUtils; | Стандартні модулі, з якими встановлюється зв’язок |
| Компоненти | Label1: TLabel; | Написи на формі |
| Edit1: TEdit; | Поле для введення даних | |
| Button1: TButton; | Кнопка пошуку | |
| DBImage1: TDBImage; | Об’єкт завантаження малюнка | |
| DBGrid2: TDBGrid; | Таблиці відображення вмісту бази даних | |
| Процедури | procedure Button1Click(Sender: TObject); | Процедура пошуку |
| procedure FormCreate(Sender: TObject); | Оновлення таблиці |
Програмний код модуля Unit4 наведено у Додатку 2.
Модуль Unit5 – модуль пошуку даних за адресою. За допомогою даного модуля можливо вручну ввести потрібне прізвище і натиснути кнопку Пошук.
Екранна форма модуля в режимі виконання програми зображена на мал.3.11.
Мал.3.11. Екранна форма Unit5 режимі виконання
Екранна форма модуля Unit5 в режимі конструювання зображена на рис. 3.12
Мал.3.12. Екранна форма Unit5 режимі конструювання
Програмна специфікація модуля Unit5 наведена у таблиці 3.6
Таблиця 3.6
| Компонент програми | Позначення | Зміст |
| Стандартні модулі | Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, DBCtrls, Grids, DBGrids, DBTables, Db, StdCtrls, Mask,DateUtils; | Стандартні модулі, з якими встановлюється зв’язок |
| Компоненти | Label1: TLabel; | Написи на формі |
| Edit1: TEdit; | Поле для введення даних | |
| Button1: TButton; | Кнопка пошуку | |
| DBImage1: TDBImage; | Об’єкт завантаження малюнка | |
| DBGrid1: TDBGrid; | Таблиці відображення вмісту бази даних | |
| Процедури | procedure Button1Click(Sender: TObject); | Процедура пошуку |
| procedure FormCreate(Sender: TObject); | Оновлення таблиці |
Програмний код модуля Unit5 наведено у Додатку 2.
Модуль Unit6 – модуль пошуку і відображення списку пенсіонерів. За допомогою даного модуля можна визначити список пенсіонерів і вивести на принтер їх список.
Екранна форма модуля в режимі виконання програми зображена на мал.3.13.
Мал.3.13. Екранна форма Unit6 режимі виконання
Екранна форма модуля Unit6 в режимі конструювання зображена на рис. 3.14
Мал.3.14. Екранна форма Unit6 режимі конструювання
Програмна специфікація модуля Unit6 наведена у таблиці 3.7
Таблиця 3.7
| Компонент програми | Позначення | Зміст |
| Стандартні модулі | Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, DBCtrls, Grids, DBGrids, DBTables, Db, StdCtrls, Mask,DateUtils; | Стандартні модулі, з якими встановлюється зв’язок |
| Компоненти | Label1: TLabel; | Написи на формі |
| Edit1: TEdit; | Поле для введення даних | |
| Button1: TButton; BitBtn1: TBitBtn; | Кнопка пошуку | |
| DBGrid1: TDBGrid; | Таблиці відображення вмісту бази даних | |
| Процедури | procedure Button1Click(Sender: TObject); | Друк списку пенсіонерів |
| procedure FormCreate(Sender: TObject); | Оновлення таблиці | |
| procedure BitBtn1Click(Sender: TObject); | Відображення списку пенсіонерів |
Програмний код модуля Unit6 наведено у Додатку 2.
Модуль Unit7 – модуль таблиці вибувших. За допомогою даного модуля можна перемістити людину в окрему таблицю вибувших, попередньо вказавши дату вибуття та причину вибуття.
Екранна форма модуля в режимі виконання програми зображена на мал.3.15.
Мал.3.15. Екранна форма Unit7 режимі виконання
Екранна форма модуля Unit7 в режимі конструювання зображена на рис. 3.16
Мал.3.16. Екранна форма Unit7режимі конструювання
Програмна специфікація модуля Unit7 наведена у таблиці 3.8
Таблиця 3.8
| Компонент програми | Позначення | Зміст |
| Стандартні модулі | 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; | Написи на формі |
| DBEdit1: TDBEdit; DBEdit2: TDBEdit; | Поле для введення даних | |
| BitBtn1: TBitBtn; | Кнопка пошуку | |
| DBGrid1: TDBGrid; DBGrid2: TDBGrid; | Таблиці відображення вмісту бази даних | |
| DBNavigator1: TDBNavigator; | Навігатор по базі даних | |
| Процедури | procedure BitBtn1Click(Sender: TObject); | Переміщення |
| procedure FormCreate(Sender: TObject); | Оновлення таблиці |
Програмний код модуля Unit6 наведено у Додатку 2.
Модуль Unit11 – додатковий модуль таблиці вибувших. За допомогою даного модуля можна ввести додаткові дані для створення довідки про прописку.
Екранна форма модуля в режимі виконання програми зображена на мал.3.17.
Мал.3.17. Екранна форма Unit11 режимі виконання
Екранна форма модуля Unit7 в режимі конструювання зображена на рис. 3.18
Мал.3.19. Екранна форма Unit11 режимі конструювання
Програмна специфікація модуля Unit11 наведена у таблиці 3.9
Таблиця 3.9
| Компонент програми | Позначення | Зміст |
| Стандартні модулі | 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; | Написи на формі |
| Edit1: TEdit; Edit2: TEdit; Edit3: TEdit; Edit4: TEdit; Edit5: TEdit; | Поле для введення даних | |
| Button1: TButton; | Кнопка пошуку | |
| Процедури | procedure Button1Click(Sender: TObject); | Кнопка присвоєння даних до звіту. |
Програмний код модуля Unit11 наведено у Додатку 2.
Модуль Unit12 – модуль який містить дані про вибувших. За допомогою даного модуля можна переглянути список вибувших, але не можливо внести зміни.
Екранна форма модуля в режимі виконання програми зображена на мал.3.20.
Мал.3.20. Екранна форма Unit12 режимі виконання
Екранна форма модуля Unit12 в режимі конструювання зображена на рис. 3.21












