Кристаллическая печать отчетов - PullRequest
Новая
       0

Кристаллическая печать отчетов

0 голосов
/ 30 декабря 2010

У меня возникла проблема. Я хочу напечатать отчет, который является квитанцией размером 3 х 4 см. Я не могу изменить размер Crystal Report. Я использую Crystal Report с Visual Studio.net 2008.

спасибо

1 Ответ

1 голос
/ 30 декабря 2010

Это иногда случается с Crystal Reports. Я сталкивался с той же проблемой раньше и успешно пробовал этот код. Ты тоже попробуй это и скажи мне, что случилось ... 

Dim doctoprint As New System.Drawing.Printing.PrintDocument()
doctoprint.PrinterSettings.PrinterName = "YourPrinterName" '(ex. "Epson SQ-1170 ESC/P 2")
For i = 0 To doctoprint.PrinterSettings.PaperSizes.Count - 1
    Dim rawKind As Integer
    If doctoprint.PrinterSettings.PaperSizes(i).PaperName = "MyCustomFormatName" Then
        rawKind = CInt(doctoprint.PrinterSettings.PaperSizes(i).GetType().GetField("kind", Reflection.BindingFlags.Instance Or Reflection.BindingFlags.NonPublic).GetValue(doctoprint.PrinterSettings.PaperSizes(i)))
        oRpt.PrintOptions.PaperSize = rawKind
        Exit For
    End If
Next
...