gn="justify">. Довідка
. Про програму
В
Рис.2. Форма В«Про програмуВ», що викликається командою меню
В
Рис.
Допомога/Про програму.
1. TImage - зображення.
2. TLabel - мітка.
. TBitBtn - кнопка з зображенням.
Опис внутрішньої структури
Архітектура програми.
Організація даних
Для роботи даного додатки використовуються структури даних, такі як:
1. Файл типу запис.
Запис має наступну структуру:
У даній програмі файл використовується для постійного зберігання інформації про заробітну плату співробітників за місяць. Довжина будь-якого компонента типізований файлу строго постійна, що дає можливість організувати прямий доступ до кожного з них. Також використовується одновимірний динамічний масив типу запис у процедурі пошуку записів для тимчасового зберігання інформації. Опис алгоритмів програми. br/>
procedure FormCreate (Sender: TObject);
У процедурі відбувається очищення текстового редактора для подальшої роботи з додатком.
procedure Action1Execute (Sender: TObject);: file of tzarplata;: tzarplata;
Процедура відкриття файлу.
Після відкриття файлу його вміст буде відображатися в текстовому редакторі.
procedure Action2Execute (Sender: TObject);: file of tzarplata;: tzarplata;, Sheet, Colum: Variant;
index: integer;
Процедура виведення записів в Excel
Дані з файлу виводяться в таблицю. Для роздруківки таблиці буде потрібно принтер. br/>
procedure Action3Execute (Sender: TObject);
Процедура друку. Для роздруківки необхідний прінтер.Action4Execute (Sender: TObject);
Вихід з программи.Action5Execute (Sender: TObject);: file of tzarplata;: tzarplata;, tn1, i: integer;: boolean;
Процедура додавання запису
Дані з однорядкових полів редагування додаються у файл і відображаються в текстовому редакторі. Після додавання запису однорядкові поля очищаються. Перед додаванням виконується перевірка - якщо табельний номер вже існує у файлі, то видається повідомлення про помилку. br/>
procedure Action6Execute (Sender: TObject);: file of tzarplata;: tzarplata;
Процедура п...
