Visual Basic (Declaration) | |
---|---|
Public Property Version As PdfVersion |
C# | |
---|---|
public PdfVersion Version {get; set;} |
C# | Copy Code |
---|---|
private void btnExport_Click(object sender, System.EventArgs e) { SectionReport1 rpt = new SectionReport1(); GrapeCity.ActiveReports.Export.Pdf.Section.PdfExport p = new GrapeCity.ActiveReports.Export.Pdf.Section.PdfExport(); p.ExportBookmarks = false; p.ImageResolution = 300; p.ImageQuality = GrapeCity.ActiveReports.Export.Pdf.Section.ImageQuality.Highest; p.NeverEmbedFonts = "Arial;Times New Roman;Verdana"; p.Version = GrapeCity.ActiveReports.Export.Pdf.Section.PdfVersion.Pdf11; p.Security.Encrypt = true; p.Security.OwnerPassword = "Mortimer"; p.Security.UserPassword = "monkey"; p.Security.Permissions = GrapeCity.ActiveReports.Export.Pdf.Section.PdfPermissions.AllowPrint; p.Security.Use128Bit = true; rpt.Run(); this.viewer1.Document = rpt.Document; p.Export(rpt.Document, Application.StartupPath + "\\p.pdf"); } |
VB.NET | Copy Code |
---|---|
Private Sub btnExport_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim rpt As New SectionReport1 Dim p As New GrapeCity.ActiveReports.Export.Pdf.Section.PdfExport p.ExportBookmarks = False p.ImageResolution = 300 p.ImageQuality = GrapeCity.ActiveReports.Export.Pdf.Section.ImageQuality.Highest p.NeverEmbedFonts = "Arial;Times New Roman;Verdana" p.Version = GrapeCity.ActiveReports.Export.Pdf.Section.PdfVersion.Pdf11 p.Security.Encrypt = True p.Security.OwnerPassword = "Mortimer" p.Security.UserPassword = "monkey" p.Security.Permissions = GrapeCity.ActiveReports.Export.Pdf.Section.PdfPermissions.AllowPrint p.Security.Use128Bit = True rpt.Run() Me.Viewer1.Document = rpt.Document p.Export(rpt.Document, Application.StartupPath & "\p.pdf") End Sub |