PrintSetPaperBin(PaperSource) Method
In This Topic
Sets up the paper source property of the active printer.
Syntax
'Declaration
Public Overloads Function PrintSetPaperBin( _
ByVal As PaperSource _
) As Boolean
public bool PrintSetPaperBin(
PaperSource
)
public function PrintSetPaperBin(
: PaperSource
): Boolean;
public function PrintSetPaperBin(
: PaperSource
) : boolean;
public: bool PrintSetPaperBin(
PaperSource*
)
public:
bool PrintSetPaperBin(
PaperSource^
)
Parameters
- PaperBin
- A PaperSource object that defines the new value of the paper source property to be used.
Return Value
true if the method has been followed successfully, otherwise false. Please use the
GdPicturePDF.GetStat method or the
GdPicturePDF.PrintGetStat method to determine the specific reason for the method's failure.
Example
How to set up some printer properties to be used for printing the current document.
Dim caption As String = "Example: PrintSetPaperBin"
Dim gdpicturePDF As GdPicturePDF = New GdPicturePDF()
Dim message As String = ""
If gdpicturePDF.LoadFromFile("document_to_print.pdf", False) = GdPictureStatus.OK Then
Dim curPrinter As String = gdpicturePDF.PrintGetActivePrinter()
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
message = "Active printer: " + curPrinter + vbCrLf
Else
message = "The PrintGetActivePrinter() method has failed with the status: " + gdpicturePDF.GetStat()
End If
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
Dim pSource As System.Drawing.Printing.PaperSource = new System.Drawing.Printing.PaperSource()
pSource.RawKind = 7
If gdpicturePDF.PrintSetPaperBin(pSource) Then
message = message + " paper bin: 7 (automatic feed)" + vbCrLf
Else
message = "The PrintSetPaperBin() method has failed with the status: " + gdpicturePDF.GetStat()
End If
End If
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
Dim pSize As System.Drawing.Printing.PaperSize = New System.Drawing.Printing.PaperSize("My custom size", 120, 250)
gdpicturePDF.PrintSetPaperSize(pSize)
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
message = message + " paper size: 120, 250" + vbCrLf
Else
message = "The PrintSetPaperSize() method has failed with the status: " + gdpicturePDF.GetStat()
End If
End If
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
gdpicturePDF.PrintSetFromToPage(2, 4)
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
message = message + " page range: 2-4" + vbCrLf
Else
message = "The PrintSetFromToPage() method has failed with the status: " + gdpicturePDF.GetStat()
End If
End If
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
If gdpicturePDF.Print() = 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: " + gdpicturePDF.PrintGetStat().ToString()
If gdpicturePDF.PrintGetStat() = GdPictureStatus.PrintingException Then
message = message + " Error: " + gdpicturePDF.PrintGetLastError()
End If
End If
Else
message = "The example has NOT been followed successfully. Status: " + gdpicturePDF.GetStat().ToString()
End If
Else
message = "The file can't be loaded. Status: " + gdpicturePDF.GetStat().ToString()
End If
MessageBox.Show(message, caption)
gdpicturePDF.Dispose()
string caption = "Example: PrintSetPaperBin";
GdPicturePDF gdpicturePDF = new GdPicturePDF();
string message = "";
if (gdpicturePDF.LoadFromFile("document_to_print.pdf", false) == GdPictureStatus.OK)
{
string curPrinter = gdpicturePDF.PrintGetActivePrinter();
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
message = "Active printer: " + curPrinter + "\n";
else
message = "The PrintGetActivePrinter() method has failed with the status: " + gdpicturePDF.GetStat();
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
{
System.Drawing.Printing.PaperSource pSource = new System.Drawing.Printing.PaperSource();
pSource.RawKind = 7;
if (gdpicturePDF.PrintSetPaperBin(pSource))
message = message + " paper bin: 7 (automatic feed)\n";
else
message = "The PrintSetPaperBin() method has failed with the status: " + gdpicturePDF.GetStat();
}
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
{
System.Drawing.Printing.PaperSize pSize = new System.Drawing.Printing.PaperSize("My custom size", 120, 250);
gdpicturePDF.PrintSetPaperSize(pSize);
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
message = message + " paper size: 120, 250\n";
else
message = "The PrintSetPaperSize() method has failed with the status: " + gdpicturePDF.GetStat();
}
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
{
gdpicturePDF.PrintSetFromToPage(2,4);
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
message = message + " page range: 2-4\n";
else
message = "The PrintSetFromToPage() method has failed with the status: " + gdpicturePDF.GetStat();
}
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
{
if (gdpicturePDF.Print() == GdPictureStatus.OK)
{
message = message + "The file has been printed successfully using new settings.";
}
else
{
message = message + "The file can't be printed.\nStatus: " + gdpicturePDF.PrintGetStat().ToString();
if (gdpicturePDF.PrintGetStat() == GdPictureStatus.PrintingException)
message = message + " Error: " + gdpicturePDF.PrintGetLastError();
}
}
else
{
message = "The example has NOT been followed successfully. Status: " + gdpicturePDF.GetStat().ToString();
}
}
else
{
message = "The file can't be loaded. Status: " + gdpicturePDF.GetStat().ToString();
}
MessageBox.Show(message, caption);
gdpicturePDF.Dispose();
Example
How to set up some printer properties to be used for printing the current document.
Dim caption As String = "Example: PrintSetPaperBin"
Dim gdpicturePDF As GdPicturePDF = New GdPicturePDF()
Dim message As String = ""
If gdpicturePDF.LoadFromFile("document_to_print.pdf", False) = GdPictureStatus.OK Then
Dim curPrinter As String = gdpicturePDF.PrintGetActivePrinter()
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
message = "Active printer: " + curPrinter + vbCrLf
Else
message = "The PrintGetActivePrinter() method has failed with the status: " + gdpicturePDF.GetStat()
End If
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
Dim pSource As System.Drawing.Printing.PaperSource = new System.Drawing.Printing.PaperSource()
pSource.RawKind = 7
If gdpicturePDF.PrintSetPaperBin(pSource) Then
message = message + " paper bin: 7 (automatic feed)" + vbCrLf
Else
message = "The PrintSetPaperBin() method has failed with the status: " + gdpicturePDF.GetStat()
End If
End If
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
Dim pSize As System.Drawing.Printing.PaperSize = New System.Drawing.Printing.PaperSize("My custom size", 120, 250)
gdpicturePDF.PrintSetPaperSize(pSize)
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
message = message + " paper size: 120, 250" + vbCrLf
Else
message = "The PrintSetPaperSize() method has failed with the status: " + gdpicturePDF.GetStat()
End If
End If
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
gdpicturePDF.PrintSetFromToPage(2, 4)
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
message = message + " page range: 2-4" + vbCrLf
Else
message = "The PrintSetFromToPage() method has failed with the status: " + gdpicturePDF.GetStat()
End If
End If
If gdpicturePDF.GetStat() = GdPictureStatus.OK Then
If gdpicturePDF.Print() = 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: " + gdpicturePDF.PrintGetStat().ToString()
If gdpicturePDF.PrintGetStat() = GdPictureStatus.PrintingException Then
message = message + " Error: " + gdpicturePDF.PrintGetLastError()
End If
End If
Else
message = "The example has NOT been followed successfully. Status: " + gdpicturePDF.GetStat().ToString()
End If
Else
message = "The file can't be loaded. Status: " + gdpicturePDF.GetStat().ToString()
End If
MessageBox.Show(message, caption)
gdpicturePDF.Dispose()
string caption = "Example: PrintSetPaperBin";
GdPicturePDF gdpicturePDF = new GdPicturePDF();
string message = "";
if (gdpicturePDF.LoadFromFile("document_to_print.pdf", false) == GdPictureStatus.OK)
{
string curPrinter = gdpicturePDF.PrintGetActivePrinter();
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
message = "Active printer: " + curPrinter + "\n";
else
message = "The PrintGetActivePrinter() method has failed with the status: " + gdpicturePDF.GetStat();
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
{
System.Drawing.Printing.PaperSource pSource = new System.Drawing.Printing.PaperSource();
pSource.RawKind = 7;
if (gdpicturePDF.PrintSetPaperBin(pSource))
message = message + " paper bin: 7 (automatic feed)\n";
else
message = "The PrintSetPaperBin() method has failed with the status: " + gdpicturePDF.GetStat();
}
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
{
System.Drawing.Printing.PaperSize pSize = new System.Drawing.Printing.PaperSize("My custom size", 120, 250);
gdpicturePDF.PrintSetPaperSize(pSize);
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
message = message + " paper size: 120, 250\n";
else
message = "The PrintSetPaperSize() method has failed with the status: " + gdpicturePDF.GetStat();
}
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
{
gdpicturePDF.PrintSetFromToPage(2,4);
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
message = message + " page range: 2-4\n";
else
message = "The PrintSetFromToPage() method has failed with the status: " + gdpicturePDF.GetStat();
}
if (gdpicturePDF.GetStat() == GdPictureStatus.OK)
{
if (gdpicturePDF.Print() == GdPictureStatus.OK)
{
message = message + "The file has been printed successfully using new settings.";
}
else
{
message = message + "The file can't be printed.\nStatus: " + gdpicturePDF.PrintGetStat().ToString();
if (gdpicturePDF.PrintGetStat() == GdPictureStatus.PrintingException)
message = message + " Error: " + gdpicturePDF.PrintGetLastError();
}
}
else
{
message = "The example has NOT been followed successfully. Status: " + gdpicturePDF.GetStat().ToString();
}
}
else
{
message = "The file can't be loaded. Status: " + gdpicturePDF.GetStat().ToString();
}
MessageBox.Show(message, caption);
gdpicturePDF.Dispose();
See Also