ActiveReportコントロールを生成


ヘタレ  2008-10-22 23:53:17  No: 140699

ActiveReportご存知の方いらっしゃたらよろしくおねがいします。
環境はwinXP/VB6です。

ActiveReportで入力された件数分ActiveReportのテキストボックスを発行して
出力する。
10件以上になったら改ページ、以下なら入力件数分出力をしたいのですが、
可能でしょうか??

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でも同じようなことが出来るのか
教えてください...
よろしくおねがいします。


やじゅ  2008-10-23 02:13:15  No: 140700

可能です。

ActiveReportはDataSet(DataTable)型でDataSourceにセットした上で、
印刷するものなので、入力行数分のDataTableのデータを作成して渡せば
いいと思うわけです。


※返信する前に利用規約をご確認ください。




  


  このエントリーをはてなブックマークに追加