Class TamPrinter (unit amPrvPrt) |
TComponent
-----------------------------------} {TamPrinter
Constructors |
Functions |
------------------------------------------------------------------------ TamPrinter.
------------------------------------------------------------------------ TamPrinter.
Properties |
Events |
Variables |
Constructors |
------------------------------------------------------------------------} {TAMPRINTER Component} {------------------------------------------------------------------------} {------------------------------------------------------------------------} {TamPrinter.Create Purpose: Creates the Object and sets the aQuickrep and ShowPrintDialog (Creates PrintDialog if True).} {------------------------------------------------------------------------
Functions |
------------------------------------------------------------------------ TamPrinter.AdjustPaper Prupose: Try to set Papersize to Custom if not supported by printer ------------------------------------------------------------------------
------------------------------------------------------------------------} {TamPrinter.Destroy Purpose: Standard} {------------------------------------------------------------------------
------------------------------------------------------------------------} {TamPrinter.EndPageFinishToPrint Purpose: Just calls the TPrinter method with some additonal checking. {------------------------------------------------------------------------
------------------------------------------------------------------------} {TamPrinter.EndPageNewPage Purpose: Just calls the TPrinter method with some additonal checking. {------------------------------------------------------------------------
------------------------------------------------------------------------} {TamPrinter.ExecutePrintDialog purpose: nearly standard} {------------------------------------------------------------------------
------------------------------------------------------------------------} {TamPrinter.PrintQRPreview Purpose: The main function, you see it is very simple... The "trick" is not to call TPrinter.NewPage if we are printing the last Page. That's all... {------------------------------------------------------------------------
------------------------------------------------------------------------} {TamPrinter.PrintMetaFile Purpose: Can be used with any TMetafile Object.} {------------------------------------------------------------------------
------------------------------------------------------------------------ TamPrinter.RestorePaper ------------------------------------------------------------------------
Public-Deklarationen
------------------------------------------------------------------------ TamPrinter.SelectPrinter ------------------------------------------------------------------------
------------------------------------------------------------------------ TamPrinter.StartToPrint Purpose: Just calls the TPrinter method with some additonal checking. ------------------------------------------------------------------------
------------------------------------------------------------------------ TamPrinter.StorePaper ------------------------------------------------------------------------
Protected-Deklarationen
------------------------------------------------------------------------ TamPrinter.CompareDevMode Purpose: Check for user made changes, ask user to apply and try to adjust ------------------------------------------------------------------------
------------------------------------------------------------------------ TamPrinter.GetaQRPrinter Purpose: dynamically find the valid QrPrinter ------------------------------------------------------------------------
------------------------------------------------------------------------ Function TamPrinter.GetaQuickrep Purpose: intelligent search the valid Quickrep ------------------------------------------------------------------------
------------------------------------------------------------------------ TamPrinter.InitDevMode Purpose: Init the deviceMode for Printer ------------------------------------------------------------------------
------------------------------------------------------------------------} {TamPrinter.PreparePrinter purpose: Set the DeviceMode for the Printer and call PrinterDialog befor printing;} {------------------------------------------------------------------------
------------------------------------------------------------------------} {TamPrinter.PrinterReady Purpose: additional checking if printer is still printing and printing was not aborted. {------------------------------------------------------------------------
------------------------------------------------------------------------} {TamPrinter.RestorePrinter; purpose: If it was selected a printout to a File there will be a new Printer added, which will confuse Quickrep the next time previewing. So the Printer.PrinterIndex has to be restored after printing to a File.} {------------------------------------------------------------------------
------------------------------------------------------------------------ TamPrinter.SetQuickrep(Value: TQuickrep); Purpose: Standard ------------------------------------------------------------------------
------------------------------------------------------------------------ Procedure TamPrinter.SetSelectPrinterDialog Purpose: set value depending on cQRVersion ------------------------------------------------------------------------
------------------------------------------------------------------------ TamPrinter.SetShowPrintDialog(Value: Boolean); purpose: Set the Property and create or free the Dialog component. ------------------------------------------------------------------------
------------------------------------------------------------------------} {Procedure TamPrinter.StorePrinter; {------------------------------------------------------------------------
Properties |
Published-Deklarationen
Events |
Variables |
Private-Deklarationen