ХТИ – филиал ФГАОУ ВПО
«Сибирский федеральный университет»
Отчет по лабораторной работе №6:
«Разработка приложения для формирования отчетов по данным одной и нескольких таблиц»
Выполнил: студент группы 53-1
Крылов А.Е
Проверил: Минеев П.В.
Абакан – 2014
Задание лабораторной работы № 6.
1. Создать отчет следующего вида
Список клиентов
ФИО Город Телефон
Иванов Абакан 323456
Петров Москва 7436236
Сидоров Омск 26453
И т.д.
Общее количество клиентов (число) человек
2. Создать отчет следующего вида
Перечень автомобилей, предлагаемых к продаже
Код модели Название Завод-изготовитель Цвет Цена (руб)
Ваз-21012 Лада ВАЗ Белый 300000
и т.д.
Общее количество моделей (число) штук
3. Создать многотабличный отчет следующего вида
Справка о заказах на автомобили
Номер заказа Фио покупателя Название модели Цена(руб)
5 Иванов Ваз-21012 300000
И т.д.
Всего сделано (число) заказов на сумму (число) руб.
4. Организовать экспорт последнего отчета в текстовый файл по методике, изложенной в лекции. Открыть и просмотреть файл отчета в MsWord.
Выполнение лабораторной работы.
1. Базу данных из трех связанных таблиц Клиенты, Автомобили, Договоры возьмем из предыдущей лабораторной работы. Скопируем ее в текущую папку проекта Delphi.
Рис. 1 - Вид базы данных
2. Создадим в Delphi новый проект и на форме разместим следующие компоненты: 1 ADOConnection, 2ADOTable, 1ADOQuery, 3 frxDBDataset, 3 frxReport1, 1 frxRTFExport, 1 MainMenu.
Рис. 2 - Вид главной формы после добавления всех необходимых компонент
3. Настроим свойства компонент, для этого:
• Через двойной щелчок откроем окно настройки компонента ADOConnection1.
Рис. 3 – Вид окна настройки компонента ADOConnection
• Откроем окно «Свойства канала передачи данных», выберем из списка провайдер, введем путь и имя файла, в котором находится база данных, проверим соединение.
Рис. 4 – Вид окна свойств канала передачи данных компонента ADOConnection
Рис. 5 – Вид окна свойств канала передачи данных компонента ADOConnection
• Настроим компонент ADOQuery1. Для этого в свойство Connection внесем значение ADOConnection1.
В свойство SQLвведем следующее
«SELECT Договоры.[Nomerdogovora], Клиенты.Familia, Клиенты.Imya, Клиенты.Otchestvo, Автомобили.Nazvanie, Автомобили.Cena
FROM Договоры, Клиенты, Автомобили
WHERE Договоры.[Nomerklienta] = Клиенты.[Nomerklienta] AND Договоры.[Kodmodeli] = Автомобили.[Kodmodeli]»
Рис. 6 – Вид инспектора объектов компонента AdoQuery1
• Настроим компонент ADOTable1. Для этого в свойство Connection введем ADOConnection1, в свойство TableNameвведем имя необходимой таблицы из БД. Аналогично настроим компонент ADOTable2.
Рис. 7 – Вид инспектора объектов компонента ADOTable1
Рис. 8 – Вид инспектора объектов компонента ADOTable2
• Настроим компонент frxDBDataset1. Для этого в свойство DataSet введем значение ADOTable1. В свойство DataSet компонент frxDBDataset 2, frxDBDataset 3 введем ADOTable2 и ADOQuery1 соответственно.
Рис. 9 – Вид инспектора объектов компонента frxDBDataset1
Рис. 10 – Вид инспектора объектов компонента frxDBDataset2
Рис. 11 – Вид инспектора объектов компонента frxDBDataset3
• Настроим компонент frxReport1. Для этого в свойство DataSet введем значение frxDBDataset1. В свойство DataSet компонент frxReport2, frxReport3 введем frxDBDataset2 и frxDBDataset3 соответственно.
Рис. 12 – Вид инспектора объектов компонента frxReport1
Рис. 13 – Вид инспектора объектов компонента frxReport2
Рис. 14 – Вид инспектора объектов компонента frxReport3
• Настроим компонент MainMenu. Для этого добавим разделы главного меню «Задание 1», «Задание 2», «Задание 3», «Задание 4», «Выход».
Для каждого раздела организуем просмотр отчета соответствующего задания.
frxReport1.ShowReport();
frxReport2.ShowReport();
frxReport3.ShowReport();
4. Создадим три отчета в соответствии с заданием.
• Для этого двойным кликом по frxReport откроем редактор отчетов FastReport.
• Укажем какие источники данных используются в отчете. Для этого выберем пункт «Report | Data» и в открывшемся окне отметим нужные источники.
Рис. 15 – Вид окна со списком источника данных
• Добавим все необходимые компоненты на соответствующиебэнды.
Рис. 16 – Вид окна FastReportдля первого задания
Рис. 17 – Вид окна FastReportдля второго задания
Рис. 18 – Вид окна FastReportдля третьего задания
5. Для четвертого задания организуем экспорт отчета из задания 3 в текстовый файл при нажатии на раздел главного меню «Задание 4».
frxReport3.Export(frxRTFExport1);
6. Запустим приложение
Рис. 19 – Вид работающего приложения сразу после запуска
Рис. 20 – Вид готового отчета, открывающегося при нажатии на раздел главного меню «Задание 1»
Рис. 21 – Вид готового отчета, открывающегося при нажатии на раздел главного меню «Задание 2»
Рис. 22 – Вид готового отчета, открывающегося при нажатии на раздел главного меню «Задание 3»
Рис. 23 – Вид окна, открывающегося при нажатии на раздел главного меню «Задание 4»
Рис. 24 – Вид диалогового окна, для сохранения отчета, созданного по третьему заданию
Рис. 25 – Вид текстового документа, экспортированного из отчета
Разработка приложения для формирования отчетов по данным одной и нескольких таблиц
Лабораторная работа по предмету «Информатика»