Class TPrintProgress (unit FPrint)

Inherits from

TForm

Constructors



Functions

procedure CancelBtnClick(Sender: TObject);


procedure FormShow(Sender: TObject);


procedure WMStartPrinting(var Msg: TMsg);


Properties

Events

Variables

BkPanel : TPanel;


CancelBtn : TButton;


Label1 : TLabel;


StatusBar : TPanel;


Cancelled : Boolean;


Lines : TStrings;


PrinterFont : TFont;



Constructors


Functions


procedure CancelBtnClick(Sender: TObject);


procedure FormShow(Sender: TObject);


procedure WMStartPrinting(var Msg: TMsg);


Properties


Events


Variables


BkPanel : TPanel;


CancelBtn : TButton;


Label1 : TLabel;


StatusBar : TPanel;


Cancelled : Boolean;


Lines : TStrings;


PrinterFont : TFont;