| Class TQRPhoneReport (unit PBQRRpt) |
TForm
| Constructors |
| Functions |
procedure PBRptAfterPrint(Sender: TObject);
procedure PBRptBeforePrint(var PrintReport: Boolean);
procedure PBRptNeedData(var MoreData: Boolean);| Properties |
| Events |
| Variables |
lblAddress : TQRLabel;
lblCity : TQRLabel;
lblComment : TQRLabel;
lblName : TQRLabel;
lblPhoneNumber : TQRLabel;
lblPhoneType : TQRLabel;
lblState : TQRLabel;
lblTitle : TQRLabel;
lblZip : TQRLabel;
PBRpt : TQuickReport;
QRBand1 : TQRBand;
QRBand2 : TQRBand;
QRBand3 : TQRBand;
QRBand4 : TQRBand;
QRLabel1 : TQRLabel;
QRLabel2 : TQRLabel;
QRLabel3 : TQRLabel;
QRLabel4 : TQRLabel;
QRLabel5 : TQRLabel;
QRLabel7 : TQRLabel;
QRLabel8 : TQRLabel;
QRShape1 : TQRShape;
bContinue : Boolean;
ReportPhoneBase : Variant;
ReportPhoneNumbers : Variant;| Constructors |
| Functions |
procedure PBRptAfterPrint(Sender: TObject);
procedure PBRptBeforePrint(var PrintReport: Boolean);Otherwise we're just going to keep enumerating through the phone numbers.
procedure PBRptNeedData(var MoreData: Boolean);| Properties |
| Events |
| Variables |
lblAddress : TQRLabel;
lblCity : TQRLabel;
lblComment : TQRLabel;
lblName : TQRLabel;
lblPhoneNumber : TQRLabel;
lblPhoneType : TQRLabel;
lblState : TQRLabel;
lblTitle : TQRLabel;
lblZip : TQRLabel;
PBRpt : TQuickReport;
QRBand1 : TQRBand;
QRBand2 : TQRBand;
QRBand3 : TQRBand;
QRBand4 : TQRBand;
QRLabel1 : TQRLabel;
QRLabel2 : TQRLabel;
QRLabel3 : TQRLabel;
QRLabel4 : TQRLabel;
QRLabel5 : TQRLabel;
QRLabel7 : TQRLabel;
QRLabel8 : TQRLabel;
QRShape1 : TQRShape;
bContinue : Boolean;
ReportPhoneBase : Variant;Private declarations
ReportPhoneNumbers : Variant;