js_cailiao.~pas

来自「相关的销售服务管理行业的一个软件」· ~PAS 代码 · 共 50 行

unit js_cailiao;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Qrctrls, QuickRpt, ExtCtrls, Db;

type
  Tclreport = class(TForm)
    QuickRep1: TQuickRep;
    TitleBand1: TQRBand;
    QRLabel2: TQRLabel;
    vQRShape4: TQRShape;
    QRLabel7: TQRLabel;
    vQRShape6: TQRShape;
    QRLabel10: TQRLabel;
    QRS_vLine: TQRShape;
    QRLabel11: TQRLabel;
    QRL_total: TQRLabel;
    QRS_vLine1: TQRShape;
    QRB_detail: TQRBand;
    QRDBText1: TQRDBText;
    vQRShape10: TQRShape;
    QRDBT_shoesno: TQRDBText;
    vQRShape11: TQRShape;
    QRDBT_color: TQRDBText;
    QRDBT_total: TQRDBText;
    vQRShape1: TQRShape;
    hQRShape2: TQRShape;
    QRShape3: TQRShape;
    QRS_vLine2: TQRShape;
    QRShape1: TQRShape;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  clreport: Tclreport;

implementation

uses U_DM,U_DDCX;

{$R *.DFM}

end.