水晶报表转成PDF打印时为什么字体虚,不是正常的字体!

Question

你用的是什么打印机,如果不激光的话,那就有可以是打印机的问题, 我公司现在有的pdf档就有这种情况,所以这样的档案我们都用喷墨的打.

Answer 1

首先,谢谢二位的支持!
我想应该与打印机没有关系,因为在网页显示时字体就虚,所以打出来自然就虚,是不是什么设置问题,我的打印设置代码如下,请指点:
Dim conn As New SqlConnection
            Dim sqldata As SqlDataAdapter
            Dim ds As New DataSet
            Dim opt As New ReportDocument
            Dim qsrq, zzrq As String
            qsrq = Me.Session("qsrq")
            zzrq = Me.Session("zzrq")            conn.ConnectionString = Me.Application("connect")            sqldata = New SqlDataAdapter("SELECT wtdw as '委托单位', isnull(SUM(hte),0) AS 合同额, isnull(SUM(hte),0) / (SELECT SUM(hte) FROM htk) AS '合同额所占公司总额比重%', isnull(SUM(khhte),0) AS 考核合同额 FROM htk,rule_bmdmk where rule_bmdmk.bcode=htk.bcode and rule_bmdmk.ssgs='" + Session("ssgs") + "' and qdrq between '" + Session("qsrq") + "' and '" + Session("zzrq") + "' GROUP BY  wtdw", conn)
            sqldata.Fill(ds, "htk")
            opt.Load(Server.MapPath("htgl_wtdw_all1.rpt"))            opt.SetDataSource(ds)
            CrystalReportViewer1.ReportSource = opt
            Dim fname As String
            Dim crDiskFileDestinationOptions As DiskFileDestinationOptions
            Dim crExportOptions As ExportOptions            fname = "c:\temp.pdf"
            crDiskFileDestinationOptions = New DiskFileDestinationOptions
            crDiskFileDestinationOptions.DiskFileName = fname
            crExportOptions = opt.ExportOptions
            With crExportOptions
                .DestinationOptions = crDiskFileDestinationOptions
                .ExportDestinationType = ExportDestinationType.DiskFile
                .ExportFormatType = ExportFormatType.PortableDocFormat
            End With
            opt.Export()
            Response.ClearContent()
            Response.ClearHeaders()
            Response.ContentType = "application/pdf"
            Response.WriteFile(fname)
            Response.Flush()
            Response.Close()

Answer 2

我问下！你们在设置水景报表中的图表（ChartObject）的时候！是怎样设置它的相关属性的！比如：显示的样式、是否显示图例、是否显示组轴等（用程序怎么实现）