'We assume that the GdViewer1 control has been properly integrated.
Dim message As String = ""
Dim curPrinter As String = GdViewer1.PrintGetActivePrinter()
If GdViewer1.GetStat() = GdPictureStatus.OK Then
message = "Active printer: " + curPrinter + vbCrLf
Else
message = "The PrintGetActivePrinter() method has failed with the status: " + GdViewer1.GetStat()
End If
If GdViewer1.GetStat() = GdPictureStatus.OK Then
If GdViewer1.PrintSetPaperBin(7) Then
message = message + " paper bin: 7 (automatic feed)" + vbCrLf
Else
message = "The PrintSetPaperBin() method has failed with the status: " + GdViewer1.GetStat()
End If
End If
If GdViewer1.GetStat() = GdPictureStatus.OK Then
GdViewer1.PrintSetUserPaperSize(120, 250)
If GdViewer1.GetStat() = GdPictureStatus.OK Then
message = message + " paper size: 120, 250" + vbCrLf
Else
message = "The PrintSetUserPaperSize() method has failed with the status: " + GdViewer1.GetStat()
End If
End If
If GdViewer1.GetStat() = GdPictureStatus.OK Then
GdViewer1.PrintSetFromToPage(2, 4)
If GdViewer1.GetStat() = GdPictureStatus.OK Then
message = message + " page range: 2-4" + vbCrLf
Else
message = "The PrintSetFromToPage() method has failed with the status: " + GdViewer1.GetStat()
End If
End If
If GdViewer1.GetStat() = GdPictureStatus.OK Then
'We assume that the required document is displayed in the GdViewer1 control.
If GdViewer1.Print(PrintSizeOption.PrintSizeOptionActual) = GdPictureStatus.OK Then
message = message + "The file has been printed successfully using new settings."
Else
message = message + "The file can't be printed." + vbCrLf + "Status: " + GdViewer1.PrintGetStat().ToString()
If GdViewer1.PrintGetStat() = GdPictureStatus.PrintingException Then message = message + " Error: " + GdViewer1.PrintGetLastError()
End If
Else
message = "The example has NOT been followed successfully. Status: " + GdViewer1.GetStat().ToString()
End If
MessageBox.Show(message, "GdViewer.PrintSetUserPaperSize")
//We assume that the GdViewer1 control has been properly integrated.
string message = "";
string curPrinter = GdViewer1.PrintGetActivePrinter();
if (GdViewer1.GetStat() == GdPictureStatus.OK)
message = "Active printer: " + curPrinter + "\n";
else
message = "The PrintGetActivePrinter() method has failed with the status: " + GdViewer1.GetStat();
if (GdViewer1.GetStat() == GdPictureStatus.OK)
{
if (GdViewer1.PrintSetPaperBin(7))
message = message + " paper bin: 7 (automatic feed)\n";
else
message = "The PrintSetPaperBin() method has failed with the status: " + GdViewer1.GetStat();
}
if (GdViewer1.GetStat() == GdPictureStatus.OK)
{
GdViewer1.PrintSetUserPaperSize(120, 250);
if (GdViewer1.GetStat() == GdPictureStatus.OK)
message = message + " paper size: 120, 250\n";
else
message = "The PrintSetUserPaperSize() method has failed with the status: " + GdViewer1.GetStat();
}
if (GdViewer1.GetStat() == GdPictureStatus.OK)
{
GdViewer1.PrintSetFromToPage(2, 4);
if (GdViewer1.GetStat() == GdPictureStatus.OK)
message = message + " page range: 2-4\n";
else
message = "The PrintSetFromToPage() method has failed with the status: " + GdViewer1.GetStat();
}
if (GdViewer1.GetStat() == GdPictureStatus.OK)
{
//We assume that the required document is displayed in the GdViewer1 control.
if (GdViewer1.Print(PrintSizeOption.PrintSizeOptionActual) == GdPictureStatus.OK)
{
message = message + "The file has been printed successfully using new settings.";
}
else
{
message = message + "The file can't be printed.\nStatus: " + GdViewer1.PrintGetStat().ToString();
if (GdViewer1.PrintGetStat() == GdPictureStatus.PrintingException)
message = message + " Error: " + GdViewer1.PrintGetLastError();
}
}
else
{
message = "The example has NOT been followed successfully. Status: " + GdViewer1.GetStat().ToString();
}
MessageBox.Show(message, "GdViewer.PrintSetUserPaperSize");