quickreport 1レコードを複数ページにわたって印刷するには？

解決

もじゃもじゃ 2013-08-20 05:35:07 No: 45114

いつもお世話になっています。

winXP、Delphi6、付属のquickreport
フォームに Dataset、QuickRep、ディティルバンドひとつを置いています。
A4縦 1ページ分いっぱいにレイアウトし、Datasetの1レコード毎に1ページ印刷は出来ています。
これを1レコードあたり複数ページにわたって印刷するようにしたいのです。
(同じページを複数枚、という意味ではありません。ページ毎にレイアウトは異なります。)

・単純にディティルバンドの縦幅を伸ばす
→A4からはみ出した部分を印刷してくれません。

・QRCompositeReportで複数レポートを合体
→きちんと検証していませんがサンプルデモを見たところ
1ページ目、1ページ目、1ページ目、2ページ目、2ページ目、2ページ目、3ページ目…
という印刷結果になりそうな気がするので却下。
(1ページ目、2ページ目、3ページ目。1ページ目、2ページ目… としたいです。)

・チャイルドバンドを使用
→ディティルバンドに対してチャイルドバンド追加、さらにそいつにチャイルドバンド追加としたところ
実現出来そうな感じでしたが、方向性はこれでよいのでしょうか…
スマートでない気が^^;

他に良い方法があればお願い致します。

ありい 2013-08-21 21:53:51 No: 45115

もじゃもじゃさん、こんにちは。

きっちりプレビューも表示したいという事でしたら、仰る通り

> ・チャイルドバンドを使用

...しかないかなぁと思います。

＃スマート以前に、他に手はないと思います(^^;

もし印刷だけ出来れば良いってお話でしたら、単純にTQuickRepを枚数分並べて、１レコード毎に各TQuickRepをPrintして、Eofまで回す...といったところでしょうか。

「他の良い方法」がない事の追認で申し訳ないですが(^^;

もじゃもじゃ 2013-09-04 23:18:27 No: 45116

ありいさん
お返事遅くなりました。

> ・チャイルドバンドを使用
実はこの方法にたどり着くまでかなり苦労しまして。
手探りで発見したのですが、もっとシンプルなやり方ないの？と思った次第です。

ありがとうございました。