ActiveReports

This commit is contained in:
2024-09-27 15:20:25 +02:00
parent 7b57b75b8e
commit 79c72a07bf
6 changed files with 144 additions and 47 deletions

View File

@@ -644,7 +644,7 @@ Public Class SendungOptions
rpt.Run(False)
' If Printername = "" Then rpt.Dispose() : Exit Sub
rpt.Document.Printer.PrinterName = Printername
rpt.Document.PrintOptions.Margin = New GrapeCity.ActiveReports.Extensibility.Printing.Margin(0, 0, 0, 0)
rpt.Document.PrintOptions.Margin = New GrapeCity.ActiveReports.Printing.Margin(0, 0, 0, 0)
rpt.Document.Printer.OriginAtMargins = False
'rpt.Document.Printer.PrinterSettings.PrintRange = Printing.PrintRange.Selection
'rpt.Document.Printer.PrinterSettings.PrintRange = Printing.PrintRange.CurrentPage