Проблемка с отчетами QuickReport

← →
Sergl (2007-11-12 09:05) [0]

Нужно вывести отчет из БД. Сейчас структура(порядок расоположения компонентов) на QuickRep1 такая: QRBand(title),QRGroup1,QRBand(detail),QRBand(groupfooter). Здесь все выводится так как мне нужно. Теперь я хочу в этот QuickRep1 вывести еще одну группу из другой таблицы БД. Пытаюсь добавить новые компоненты(QRBand(title),QRGroup1,QRBand(detail),QRBand(groupfooter)) для вывода а они путаются со старыми. Нужен как бы "разрыв" страницы... Как мне быть?

← →
Sergey13 © (2007-11-12 09:19) [1]

> [0] Sergl (12.11.07 09:05)
> Как мне быть?

Композитный отчет. Это когда два (или более) независимых отчета объявляются одним и печатаются последовательно.

← →
Sergl (2007-11-12 09:20) [2]

> Нужен как бы "разрыв" страницы...

После перевой группы компонентов QRBand(title),QRGroup1,QRBand(detail),QRBand(groupfooter)

← →
Sergl (2007-11-13 08:03) [3]

Сначала написал так:

monitorform.QuickRep1.Preview; monitorform.QuickRep2.Preview;
Все нормально, отображаются оба отчета по очереди.

Теперь, следуя совету выше, делаю так:
monitorform.QRCompositeReport1.Reports.Add(monitorform.QuickRep1); monitorform.QRCompositeReport1.Reports.Add(monitorform.QuickRep2); monitorform.QRCompositeReport1.Preview;
и вообще не вижу ни одного отчета... Что не так?

← →
Sergl (2007-11-13 08:17) [4]

Написал, после добавления,
showmessage(inttostr(monitorform.QRCompositeReport1.Reports.Count));
Показывает что два их тама сидит... почему тогда не выводит???

← →
Sergl (2007-11-13 11:46) [5]

Может, всетаки, кто-нибудь чего-нибудь знает???

← →
Johnmen © (2007-11-13 11:58) [6]

Полный текст процедуры приводи.

← →
Sergey13 © (2007-11-13 11:58) [7]

> [5] Sergl (13.11.07 11:46)

Я не знаю, давно юзал, все работало, а сейчас посмотреть не на чем.

Если последовательная печать отчетов идет - чем так не устраивает?

← →
Sergl (2007-11-13 12:07) [8]

> Полный текст процедуры приводи.

пожалуйста:
procedure Tmonitorform.Button4Click(Sender: TObject); begin monitorform.QRCompositeReport1.Reports.Clear; monitorform.QuickRep1.Prepare; monitorform.QuickRep2.Prepare; monitorform.QRCompositeReport1.Reports.Add(monitorform.QuickRep1.QRPrint); monitorform.QRCompositeReport1.Reports.Add(monitorform.QuickRep2.QRPrint); monitorform.QRCompositeReport1.Preview; end;

← →
Sergl (2007-11-13 12:09) [9]

> Если последовательная печать отчетов идет - чем так не устраивает?

Хотелось бы посмотреть все в одном месте... и установки принтера что бы одни были... хотя установки можно наследовать...

> Sergl (13.11.07 12:07) [8]

В справке и в дельфовых примерах написано, как собирается композитный отчет. У тебя написана ерунда.

← →
Sergl (2007-11-13 14:15) [11]

Небуду композитивные отчеты писать.
Другой вопрос: пытаюсь наследовать установки принтера, пишу так
monitorform.QuickRep1.PrinterSetup; monitorform.QuickRep2.PrinterSettings:=monitorform.QuickRep1.PrinterSettings;
Почему при завершении работы всего приложения возникает Access Violation а затем RunTime error 216... Так вообще наследовать можно?

← →
Sergl (2007-11-13 14:21) [12]

Еще сразу скажу: если эти две строчки закоментировать то ошибки не возникает.
ЗЫ.Печать идет согласно установкам monitorform.QuickRep1.PrinterSetup;

Проблемка с отчетами QuickReport Найти похожие ветки