delphi中关于stringgrid控件的打印

多个Tab页，有的页上是StringGrid，有的页上是Chart
现在用户想打印这些内容，即顺序的打印出StringGrid和Chart
其中有些StringGrid行数很多，需要翻页
而且每一个Tab页中都有一个lable，用来显著显示该Tab页的表格标题
需要把这些都像布局在Tab页上一样的形式打印出来
怎么能直接把StringGrid连同内容一起打印出来呢？
如果使用DrawToCavnas的话，好像行数很多的话打印出来不能翻页，这样表格也会很小
也不知道我理解的对不对，是不是也可以实现，只是我不知道啊？
帮帮我，Thanks

解决方案 »

  1.   

    stringgrid可以通过SailPrint第三方组件中提供的打印控件直接连接打印，不过一次只能连接一个StringGrid，你这种情况不大可能用一个打印源吧，因为多个stringgrid和chart想连接在一起打印估计很难 
      

  2.   

    谢谢gjw310
    不过我已经初步实现了连续打印
    现在的问题是：
    StringGrid生成后，个别的行和列都进行了调整 
    很多地方都进行了合并，所以并不是一个规则的表格 
    同时，有些合并了的单元格里面的字数很多，又因为StringGrid不能换行， 
    在显示的时候通过Canvas.TextOut（）方式进行了换行 
    而且整个StringGrid通过DrawCells方法进行了上下左右的居中美化 
    但打印的时候这些效果都又恢复原样了 
    怎样才能把屏幕上显示的效果通过打印机打印出来呢？ 
    我用的是AdvStringGrid控件包另外Sailprint控件我找到安装了，确实像你说的那样，好像没办法实现多个StringGrid连续打印，所以只好暂时放弃
    也有 可能是我还没有搞懂怎么用SailPrint吧