quickreport.pas

来自「PatientRunner 20 Source」· PAS 代码 · 共 42 行

{ *************************************************************************** }
{                                                                             }
{ PatientRunner                                                               }
{                                                                             }
{ Copyright (c) 2002-2005 IgD Software, LLC                                   }
{                                                                             }
{ This file may be distributed and/or modified under the terms of the GNU     }
{ General Public License (GPL) version 2 as published by the Free Software    }
{ Foundation and appearing at http://www.gnu.org/licenses/gpl.html.           }
{                                                                             }
{ *************************************************************************** }

unit QuickReport;

interface

uses Windows, SysUtils, Messages, Classes, Graphics, Controls,
  StdCtrls, ExtCtrls, Forms, QuickRpt, QRCtrls;

type
  TQuickReportModule = class(TQuickRep)
    PageFooterBand: TQRBand;
    PageHeaderBand: TQRBand;
    DetailBand1: TQRBand;
    HeaderQRRichText: TQRRichText;
    BodyQRRichText: TQRRichText;
    PatientQRLabel: TQRLabel;
  private

  public

  end;

var
  QuickReportModule: TQuickReportModule;

implementation

{$R *.DFM}

end.