Люди, помогите с отчетом (Rave Reports)
Скажите, как "запихнуть" данные из Delphi в отчет, например в компонент Text???
На форму кладешь TRvCustomConnection, в ней обрабатываешь 3 события: OnGetCols, OnGetRow, OnOpen.
В OnOpen:
DataRows - кол-во страниц в отчете (если есть Bundle)
DataIndex - номер поля, с которого вводятся данные
В OnGetCols: описание полей в отчете: типа того - Сonnection.WriteField('NUM',dtString,10,'','');
В OnGetRow: запись в отчет реальных данных обязательно в том порядке, в каком поля для этих данных описывались в OnGetCols - Connection.WriteStrData('',Edit1.Text);.
Теперь сам отчет:
На форму отчета кладем компонент типа DataText. Выбираем меню File->New DataObject. В появившемся окне Direct Data View. Обязательно запускаем программу с описанной TRvCustomConnection, и жмем Next в окошке отчета, где выбрали Direct Data View. Должен появиться список текущих активных подключений, в котором будет и наше подключение. Выбираем его и справа в дереве проекта будет DataView1 со списком всех полей, перечисленных в TRvCustomConnection.OnGetCols.
В размещенном на форме отчета компоненте DataText указываем DataView := DataView1, DataField := NUM. Отчет готов! Сохраняем отчет.
В программе генерации отчета пишем:
RvProject1.ProjectFile := 'otchet.rav';
RvProject1.SelectReport('otchet.rav',false);
RvProject1.Execute();
В OnOpen:
DataRows - кол-во страниц в отчете (если есть Bundle)
DataIndex - номер поля, с которого вводятся данные
В OnGetCols: описание полей в отчете: типа того - Сonnection.WriteField('NUM',dtString,10,'','');
В OnGetRow: запись в отчет реальных данных обязательно в том порядке, в каком поля для этих данных описывались в OnGetCols - Connection.WriteStrData('',Edit1.Text);.
Теперь сам отчет:
На форму отчета кладем компонент типа DataText. Выбираем меню File->New DataObject. В появившемся окне Direct Data View. Обязательно запускаем программу с описанной TRvCustomConnection, и жмем Next в окошке отчета, где выбрали Direct Data View. Должен появиться список текущих активных подключений, в котором будет и наше подключение. Выбираем его и справа в дереве проекта будет DataView1 со списком всех полей, перечисленных в TRvCustomConnection.OnGetCols.
В размещенном на форме отчета компоненте DataText указываем DataView := DataView1, DataField := NUM. Отчет готов! Сохраняем отчет.
В программе генерации отчета пишем:
RvProject1.ProjectFile := 'otchet.rav';
RvProject1.SelectReport('otchet.rav',false);
RvProject1.Execute();