ustify"> procedure TForm7.btn1Click (Sender: TObject); begin Form7.RvProject1.Execute; end;
Запит на сортування елеметов бд по одному значенню
SELECT * FROM Klients ORDER BY SNP;
Запит на пошук
qry1.Close; qry1.SQL.Clear; qry1.SQL.Add ('select * from Klients where SNP like "' + Edit1.Text + '%"'); qry1.Open;
.2 Звіти
Система дозволяє виводити на друк такі звіти:
БД клієнтів (Мал. 2).
В
Рис. 2
БД квартир (Мал. 3).
В
Рис. 3
4 Інструкції з експлуатації
. Ми потрапляємо на головну форму програми. (Мал. 4)
Тут маються вкладки меню:
Реєстрація нового клієнта - реєструємо нового клієнта.
Список клієнтів - БД клієнтів.
Реєстрація нової квартири - реєструємо нову квартиру.
Список клієнтів - БД квартир.
Продати квартиру - операція з продажу квартири.
Купити квартиру - операція з купівлі квартири.
Оплата послуг - оплата обраної послуги.
Послуги - всі послуги з платежами і датами оплати послуг.
Вихід - закриття програми.
В
Рис. 4
В
Рис. 5
. Реєстрація нового клієнта. (Мал. 5)
. БД клієнтів з вбудованою формою пошуку та сортування клієнтів по ПІБ з виведенням на друк. (Мал. 6)
В
Рис.6
. Реєстрація нової квартири. (Мал. 7)
В
Рис. 7
. БД квартир з вбудованою формою пошуку та сортування квартир за найближчою метро з виведенням на друк. (Мал. 8)
В
Рис. 8
6. Продаж квартир з розрахунком податку з загальної суми та сумою квартири з урахуванням податку. (Мал. 9)
В
Рис. 9
. Список усіх послуг і виплат по них з датами. (Мал. 10)
В
Рис. 10
. Купівля квартир з розрахунком податку з загальної суми та сумою квартири з урахуванням податку. (Мал. 11)
В
Рис. 11
. Оплата послуг. (Мал. 12)
В
Рис. 12
5 Текст програми
program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}, Unit2 in 'Unit2.pas' {Form2}, Unit3 in 'Unit3.pas' {Form3}, Unit4 in ' Unit4.pas '{Form4}, Unit5 in' Unit5.pas ...