home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 1999 February / DPPCPRO0299.ISO / February / Delphi / Install / DATA.Z / MDREP.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1996-06-11  |  2.2 KB  |  92 lines
  1. {*************************************************}
  2. {*  QuickReport for Delphi                       *}
  3. {*  Demo Report MDRep                            *}
  4. {*                                               *}
  5. {*  Shows how to create master/detail reports    *}
  6. {*  using the OnNeedData event, plus how to use  *}
  7. {*  the QRDBCalc component                       *}
  8. {*************************************************}
  9.  
  10. unit Mdrep;
  11.  
  12. interface
  13.  
  14. uses
  15.   SysUtils, Windows, Messages, Classes, Graphics, Controls,
  16.   Forms, Dialogs, StdCtrls, Quickrep, DB, DBTables, ExtCtrls, Buttons, Spin,
  17.   Grids, DBGrids;
  18.  
  19. type
  20.   TMDForm = class(TForm)
  21.     MDRep: TQuickReport;
  22.     Title: TQRBand;
  23.     CustomerHeading: TQRBand;
  24.     QRDBText1: TQRDBText;
  25.     QRLabel3: TQRLabel;
  26.     QRLabel4: TQRLabel;
  27.     QRDBText3: TQRDBText;
  28.     QRDBText4: TQRDBText;
  29.     QRLabel5: TQRLabel;
  30.     QRDBText5: TQRDBText;
  31.     CustomerFooter: TQRBand;
  32.     QRDBCalc1: TQRDBCalc;
  33.     QRLabel7: TQRLabel;
  34.     PageFooter: TQRBand;
  35.     QRSysData1: TQRSysData;
  36.     Summary: TQRBand;
  37.     Detail: TQRBand;
  38.     QRDBText2: TQRDBText;
  39.     QRDBText7: TQRDBText;
  40.     QRDBCalc2: TQRDBCalc;
  41.     QRLabel6: TQRLabel;
  42.     QRLabel15: TQRLabel;
  43.     Image1: TImage;
  44.     QRLabel1: TQRLabel;
  45.     QRLabel16: TQRLabel;
  46.     QRDetailLink1: TQRDetailLink;
  47.     Orderlines: TQRBand;
  48.     QRDetailLink2: TQRDetailLink;
  49.     QRDBText8: TQRDBText;
  50.     QRLabel2: TQRLabel;
  51.     QRLabel8: TQRLabel;
  52.     QRDBText12: TQRDBText;
  53.     QRDBText13: TQRDBText;
  54.     QRDBText14: TQRDBText;
  55.     QRDBText16: TQRDBText;
  56.     QRLabel17: TQRLabel;
  57.     QRShape1: TQRShape;
  58.     QRLabel18: TQRLabel;
  59.     QRShape2: TQRShape;
  60.     QRLabel19: TQRLabel;
  61.     QRShape3: TQRShape;
  62.     QRLabel20: TQRLabel;
  63.     QRShape4: TQRShape;
  64.     OrderSummary: TQRBand;
  65.     QRShape5: TQRShape;
  66.     QRLabel21: TQRLabel;
  67.     QRDBCalc3: TQRDBCalc;
  68.     QRLabel9: TQRLabel;
  69.     QRLabel10: TQRLabel;
  70.     QRDBCalc4: TQRDBCalc;
  71.     QRDBCalc5: TQRDBCalc;
  72.     QRLabel11: TQRLabel;
  73.     QRDBCalc6: TQRDBCalc;
  74.     QRLabel12: TQRLabel;
  75.     QRDBCalc7: TQRDBCalc;
  76.   private
  77.     { Private declarations }
  78.   public
  79.     { Public declarations }
  80.   end;
  81.  
  82. var
  83.   MDForm: TMDForm;
  84.  
  85. implementation
  86.  
  87. uses Datasets;
  88.  
  89. {$R *.DFM}       
  90.  
  91. end.
  92.