| Class TReportStatusForm2 (unit Pstatus2) |
TForm
-Printing Status form
| Constructors |
| Functions |
procedure CancelBtnClick(Sender: TObject);
procedure FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure OkbtnClick(Sender: TObject);
procedure ReportFilerPrintFooter(Sender: TObject);
procedure getpageno(sender : tObject);| Properties |
| Events |
| Variables |
Bevel1 : TBevel;
CancelBtn : TBitBtn;
Label1 : TLabel;
OkBtn : TBitBtn;
PrintNotes : TCheckBox;
ReportFiler : TPreview;
CanAbort : Boolean;
LastPageNo : Integer;
ReportStream : TMemoryStream;| Constructors |
| Functions |
procedure CancelBtnClick(Sender: TObject);with
procedure FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure OkbtnClick(Sender: TObject);LastPageNo := ReportFiler.totalpage;
procedure ReportFilerPrintFooter(Sender: TObject);with
procedure getpageno(sender : tObject);| Properties |
| Events |
| Variables |
Bevel1 : TBevel;
CancelBtn : TBitBtn;
Label1 : TLabel;
OkBtn : TBitBtn;
PrintNotes : TCheckBox;
ReportFiler : TPreview;
CanAbort : Boolean;Private declarations
LastPageNo : Integer;
ReportStream : TMemoryStream;