急问:怎么不显示报表预览，就可直接打印报表的内容???

[shop98]

打印是报表设计的，采用了数据集做为数据源。
现在客户要求不用显示预览界面，按F10就可直接打印。
怎么办？有人能帮我吗？
我直接用报表文件printTOprinter，是可以直接打印，但汉字打不出来，其它正常。
如把报表放在预览中，显示了预览，再打印，那就正常。
wuwuwuuwuwuw...............

[3tzjq]

可以的！实例化报表后可以调用rpt.Document.Print方法即可直接发送数据到打印机。

[shop98]

Dim fmZprint As New fmZprint()
Dim rtProduceCard As New rtProduceCard()
rtProduceCard.SetDataSource(dsOrderA)
fmZprint.CRV.ReportSource = rtProduceCard
fmZprint.Show()
以上是我的做法，
但在报表的实例rtProduceCard中找到到document.print
只找到.PrintToPrinter
就写了一句rtProduceCard.PrintToPrinter(1, False, 0, 0)
就出现了以上问题.
在哪可以找到.document.print????