ActiveReportご存知の方いらっしゃたらよろしくおねがいします。
環境はwinXP/VB6です。
ActiveReportで入力された件数分ActiveReportのテキストボックスを発行して
出力する。
１０件以上になったら改ページ、以下なら入力件数分出力をしたいのですが、
可能でしょうか？？
VBだとコントロール配列をしようして
--------------------------------------------------------------------
For i = 1 To madrstkey.RecordCount - 1
madrstkey.MoveNext
lngCount = lngCount + 1
Me.Height = Me.Height + 400
fraSearch.Height = fraSearch.Height + 400
Load lblS(lngCount)
Load txtS(lngCount)
lblS(lngCount).top = lblS(lngCount - 1).top + 400
txtS(lngCount).top = txtS(lngCount - 1).top + 400
lblS(lngCount).Caption = madrstkey("COLNMJ")
lblS(lngCount).Visible = True
txtS(lngCount).Visible = True
cmdSearch.top = cmdSearch.top + 400
cmdCancel.top = cmdCancel.top + 400
Next
--------------------------------------------------------------------
このようにコントロールを生成することが可能でしたが
ActiveReportでも同じようなことが出来るのか
教えてください．．．
よろしくおねがいします。
可能です。
ActiveReportはDataSet(DataTable)型でDataSourceにセットした上で、
印刷するものなので、入力行数分のDataTableのデータを作成して渡せば
いいと思うわけです。