В начало

Отчет «Поставки»

 

            Задание: нужно создать отчет «Поставки» по базе данных «Optovaya baza.gdb», используя набор компонентов «Rave» в системе разработки «Дельфи 7». Сама база «Optovaya baza.gdb» создана в СУБД «Interbase 6.5» и имеет следующий набор таблиц: Edinici_Izmereniya, Kategorii, Postavki, Postavshiki, Tovari.

            Запускаем «Дельфи 7», создаем новый проект, на форму приложения перетаскиваем компоненты для подключения к базе данных: IBDataBase, IBTransAction, IBQuery. Конфигурируем компоненты между собой. В Компонент «IBQuery1», в свойство «SQL» помещаем запрос.

SELECT P1.Data, T.Nazvanie, P1.Kolichestvo, P2.Organizaciya

FROM Postavki P1

LEFT JOIN Tovari  T ON P1.Kod_Tovara=T.Kod_Tovara

LEFT JOIN Postavshiki P2 ON P1.Kod_Postavshika=P2.Kod_Postavshika

            Далее для создания отчета перетаскиваем с закладки «Rave» следующие компоненты: RvProject, RvSystem, RvDataSetConnection. Последний связываем с компонентом  «IBQuery1».

            После этого идем в главное меню программы «Дельфи 7» и вызываем редактор отчетов, выбрав в главном меню «Tools – Rave Designer». Затем создаем отчет.

Рис. 1. Отчет в редакторе отчетов

Рис. 1. Отчет в редакторе отчетов

 

            Далее, для вызова отчета из приложения, нужно в обработчике события кнопки прописать код.

Procedure TForm1.Button1Click(Sender: TObject);

Begin

   IBQuery1.Active:=True;

   RvProject1.ProjectFile:='C:\RAVE\Поставки.rav';

   RvProject1.Open;

Try

   RvProject1.Execute;

Finally

   RvProject1.Close;

End;

End;

            Теперь можно запустить приложение и проверить отчет.

Рис. 2. Отчет «Поставки»

Рис. 2. Отчет «Поставки»