Автоматизована система "Облік паспортних даних"
Курсовой проект - Компьютеры, программирование
Другие курсовые по предмету Компьютеры, программирование
ного модуля можливо вручну ввести потрібне прізвище і натиснути кнопку Пошук.
Екранна форма модуля в режимі виконання програми зображена на мал.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
Мал.3.21. Екранна форма Unit12 режимі конструювання
Програмна специфікація модуля Unit12 наведена у таблиці 3.10
Таблиця 3.10
Компонент програмиПозначення ЗмістСтандартні модуліWindows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, DBCtrls, Grids, DBGrids, DBTables, Db, StdCtrls, Mask,DateUtils;Стандартні модулі, з якими встановлюється звязокКомпоненти Label1: TLabel;Написи на формі DBEdit1: TDBEdit; DBEdit2: TDBEdit;Поле для введення даних DBImage1: TDBImage;Відображення фотоПроцедуриprocedure TForm12.FormCreate(Sender: TObject);Заборона редагування
Програмний код модуля Unit12 наведено у Додатку 2.
Модуль Unit8 - модуль формує звіт Список пенсіонерів. За допомогою даного модуля и можемо роздрукувати список пенсіонерів.
Екранна форма модуля в режимі виконання програми зображена на мал.3.22.
Мал.3.22 Екранна форма Unit8 режимі виконання
Екранна форма модуля Unit8 в режимі конструювання зображена на рис. 3.23
Мал.3.23 Екранна форма Unit8 режимі конструювання
Програмна специфікація модуля Unit8 наведена у таб?/p>