Categories
Keywords
Printers
"Printers"
unit contains all most all the methods and properties
you'd need to control Windows' printer interface. For
example, you can easily retrieve the name of the default
printer by using the "Printer"
(ready to use instance of the "TPrinter"
class) object of the "Printers"
unit as follows:
uses Printers;
function GetDefaultPrinterName : string;
begin
if(Printer.PrinterIndex > 0)then
begin
GetDefaultPrinterName :=
Printer.Printers[
Printer.PrinterIndex ];
end else
begin
GetDefaultPrinterName := '';
end;
end;
|
If you want to display a list of available printers (using a "TComboBox" named "ComboBox1" for example):
ComboBox1.Items := Printer.Printers; |
Changing the currently selected printer on the other hand is as easy as setting the "PrinterIndex" property. To use the first printer listed in the "Printers" property, set "PrinterIndex" to "0" (1st printer = 0, 2nd printer = 1, etc.).
You can also retrieve the status of a print job by using "Printing" and "Aborted" boolean properties.
To share this: BlinkBits | BlinkList | Blogmarks | Co.mments | Connotea | Del.icio.us | Digg | Facebook | FrankIt | Furl | Ma.gnolia | Newsvine | Reddit | Yahoo
Applicable Keywords : Delphi, Delphi 1.x, Delphi 2.x, Functions, Win32
Previous Tip : View your code in assembly
Random Tip : Speed-up the response of your Start Menu
Next Tip : Make it easier to read source code
Random Tip : Speed-up the response of your Start Menu
Next Tip : Make it easier to read source code