DOQuery1- gt; SQL- gt; Add ( SELECT Автомобіль. [ID автомобіля], Автомобіль.Названіе , Автомобіль.Мощность FROM Автомобіль GROUP BY Автомобіль. [ID автомобіля], Автомобіль.Названіе, Автомобіль.Мощность ORDER BY Автомобіль.Мощность; ); - gt; ADOQuery1- gt; Open ();
}
//---------------------------------------------------------------------------__fastcall TForm8 :: RadioButton3Click (TObject * Sender)
{- gt; ADOQuery1- gt; SQL- gt; Clear (); - gt; ADOQuery1- gt; SQL- gt; Add ( SELECT Реалізація. [ПІБ клієнта], Автомобіль.Названіе , Автомобіль.Цвет, Замовлення. [Рік випуску], Реалізація. [ID менеджера] FROM Замовлення INNER JOIN (Автосалон INNER JOIN (Автомобіль INNER JOIN Реалізація ON Автомобіль. [ID автомобіля]=Реалізація. [ID автомобіля]) ON Автосалон. [ Назва автосалону]=Реалізація. [Назва автосалону]) ON Замовлення. [Код замовлення]=Реалізація. [Код замовлення]; ); - gt; ADOQuery1- gt; Open ();
}
//---------------------------------------------------------------------------__fastcall TForm8 :: RadioButton4Click (TObject * Sender)
{- gt; ADOQuery1- gt; SQL- gt; Clear (); - gt; ADOQuery1- gt; SQL- gt; Add ( SELECT Клієнти. [ПІБ клієнта], Клієнти. [ Паспортні дані], Реалізація. [Дата замовлення] FROM Клієнти INNER JOIN (Автомобіль INNER JOIN Реалізація ON Автомобіль. [ID автомобіля]=Реалізація. [ID автомобіля]) ON Клієнти. [Паспортні дані]=Реалізація. [Паспортні дані] ORDER BY Реалізація. [Дата замовлення]; ); 1- gt; ADOQuery1- gt; Open ();
}
//-------------------------------------------------------------------------
Запити при роботі програми представлені нижче
3.4 Створення звітів
Звітом називається організована і отформатированная інформація, взята з бази даних і призначена для виводу на друк. Він може мати вигляд таблиці або оформлений за розробленою користувачем вільній формі. Звіт дозволяє вибрати критерії, згідно з якими витягується інформація з бази даних. Його можна доповнити малюнками, діаграмами, коментарями.
Створюючи форму для перегляду звіту, розміщуємо наступні компоненти:
- Для підключення до БД - ADOConnection, ADOTable, DataSource;
- Для відображення звіту - QuickRep, QRBand, QRDBText, QRLabel, QRDBImage (вкладка QReport);
Задаємо властивість Caption компонента QRLabel відповідно до назв стовпців таблиці БД Access.
Малюнок 3.14.- Форма для перегляду звіту
Потім задаємо властивість BandType- gt; rbDetail компонента QRBand1 і BandType- gt; rbColumnHeader компонента QRBand2. Властивість DataSet компонента QRDBText встановлюємо на ім'я компонента ADOTable для зв'язку з таблицею БД. Потім у властивості DataField вибираємо ім'я необхідного поля таблиці. На формі роботи з таблицею БД зараенее створена кнопка Каталог автомобілів, яка відповідатиме за відкриття звіту. У обробнику події OnClick цієї кнопки:
__ fastcall TForm1 :: Button2Click (TObject * Sender)
{- gt; QuickRep1- gt; Preview ();
}
4. Тестування програми
4.1 Тест 1
Перевіримо роботу програми. Для цього запустимо файл Project1.exe. Після запуску додаток відображає головну форму, що містить головне меню (рис. 4.1.)
Малюнок 4.1.- Головна форма програми
При виборі пункту меню Автосалон на екрані з'являється наступна форма, представлена ??на рис 4.2. При натисканні на кнопку Close, повертаємося в головне меню програми.
Малюнок 4.2.- Форма Автосалон
При натисканні на пункт меню Автомобіль на екрані з'являється форма, представлена ??на рис 4.3.
Малюнок 4.3.- Форма Автомобіль
Те ж саме відбувається при натисканні інших пунктів меню. Форма перегляду та пошуку даних Замовлення представлена ??на рис. 4.4.
Малюнок 4.4.- Форма Замовлення
4.2 Тест 2
Вибравши пункт головного меню Автосалон зробимо пошук за адресою (рис. 4.5.). Стрілка в області даних перемістилася на другу запис відповідно до введеного критерієм пошуку. Зробимо пошук за назвою автосалону (рис. 4.6.), Ввівши необхідну назву Кіа raquo ;, так само відбувається переміщення по записах.
Малюнок 4.5.- Пошук даних за адресою
