Лабораторные работы по базам данных в Delphi

     Настройку параметров отчета можно выполнить с помощью окна Report Settings, вызываемый двойным щелчком мыши по компоненте QuckRep. Предпочтительно пользоваться именно этим окном, так как здесь всегда можно просмотреть будущий результат.

1. Открыть приложение «Студенты».
2. Добавить на главную форму кнопку «Создание отчета».
3. Создать новую форму «Отчет», которая будет вызываться нажатием на кнопку «Создание отчета».
4. На форму установить компоненту QuickRep с закладки QReport. Выделить этот компонент и в объектном инспекторе включить параметры HasTitle и HasDetail свойства Bands.

5. Расположим  компоненты в секциях QuickRep1, которые будут отображать нужную информацию отчета. На закладке QReport палитры компонентов доступны следующие компоненты, которые можно расположить в этих разделах:
• QRLabel – надпись. Этот компонент похож на стандартный компонент TLabel и просто отображает нужные данные.
• QRDBText – данные. Этот компонент тоже похож на TLabel, только он предназначен для отображения значения какого либо поля из базы данных.
• QRSysData – системная информация. Это опять копия TLabel только с возможностью отображать системную информацию – дату, время, номер страницы, номер строки в таблицы, общее количество страниц и т.д.
• QRImage – картинка. Компонент схожий с TImage.
6. Увеличить область заголовка Title. В верхний угол поместите один компонент QRSysData. Выделить его и в свойстве Data выбрать значение qrsDateTime. Теперь этот компонент будет отображать в правом, верхнем углу дату распечатки документа.
7. В центре области Tittle установить компонент QRLabel, увеличь шрифт в свойстве Font и написать в свойстве Caption текст «Студенты».
8. Расположить в области Tittle компоненты QRLabel и дать им заголовки: ФИО, Дата рождения, Номер зачетки, Специальность, Курс.
9. Перейти к области Detail. Под заголовками поставить пять компонентов QRDBText. Установить в свойстве DataSet компонентов QRDBText набор данных - Form1.Table1, а в свойстве DataField для QRDBText1 указать SFio. У всех остальных компонентов QRDBText указать соответствующие имена полей.

10. Перейти в главный модуль и по нажатию кнопки “Печать” написать следующий код.

procedure TForm1.SpeedButton5Click(Sender: TObject);

begin

     Form4.QuickRep1.Preview; //вызывается метод Preview

     //компонента QuickRep. Этот метод показывает окно

     //предварительного просмотра созданного документа.

еnd;

11. Запустить программу, выделить какую-нибудь строку и нажать кнопку печати. Откроется окно предварительного просмотра.

12. Выделить  компонент QuickRep1 и в свойстве DataSet указать таблицу Form1.Table1.
13. Если сделать это, то компонент QuickRep1 автоматически будет перебирать все записи из этой таблицы и использовать их в компонентах, которые стоят в  блоке DetailBand1.
14. После этого в отчете появятся все записи таблицы:

15. Установить  на форму отчета компонент –  QRSubDetail с закладки QReport. Этот компонент предназначен для перебора данных относящихся к подчиненным таблицам.
16. Установить следующие свойства: DataSet – Form1.Table2, чтобы связать блок с таблицей Uspevaemost.db, которая является подчиненной к основной Studenti.db.
17. В свойстве Master нужно указать главный компонент с основными данными. Выбрать в этом свойстве QuickRep1.
18. Расположить на компоненте QRSubDetail компоненты QRDBText в свойстве указав, к каким полям подчиненной таблицы они обращаются.
19. Получится следующий вид отчета: