⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 udyhy_dzd.~pas

📁 行业应急系统 包括: 应急系统(待遇核发) 发放系统 开发环境:Delphi5 (sp1)+ Oracle 8.05 MultiExport是一个可以将数据按指定字段倒出
💻 ~PAS
字号:
unit uDyhy_Dzd;

interface

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

type
  TfrmDyhd_dzd = class(TForm)
    QuickRep1: TQuickRep;
    DetailBand1: TQRBand;
    TitleBand1: TQRBand;
    QRSysData1: TQRSysData;
    QRLabel1: TQRLabel;
    QRLabel2: TQRLabel;
    QRLabel3: TQRLabel;
    QRLabel4: TQRLabel;
    QRLabel5: TQRLabel;
    QRLabel6: TQRLabel;
    QRLabel7: TQRLabel;
    QRLabel8: TQRLabel;
    QRShape2: TQRShape;
    QRShape3: TQRShape;
    QRShape4: TQRShape;
    QRShape5: TQRShape;
    QRShape6: TQRShape;
    QRShape7: TQRShape;
    QRShape8: TQRShape;
    QRShape9: TQRShape;
    QRShape10: TQRShape;
    QRShape11: TQRShape;
    QRShape1: TQRShape;
    QRShape12: TQRShape;
    QRShape13: TQRShape;
    QRLabel9: TQRLabel;
    QRShape14: TQRShape;
    QRShape15: TQRShape;
    QRShape16: TQRShape;
    QRLabel10: TQRLabel;
    QRLabel11: TQRLabel;
    QRLabel12: TQRLabel;
    QRLabel13: TQRLabel;
    qryInfo: TQuery;
    qryInfoRYID: TStringField;
    qryInfoTZRQ: TDateTimeField;
    qryInfoBH: TStringField;
    qryInfoXM: TStringField;
    qryInfoSHBZH: TStringField;
    qryInfoLTXSJ: TDateTimeField;
    qryInfoDWDM: TStringField;
    qryInfoDWMC: TStringField;
    qryInfoYLDYHJ_TZQ: TFloatField;
    qryInfoJCYLJ_TZQ: TFloatField;
    qryInfoGDXYLJ_TZQ: TFloatField;
    qryInfoGRZHYLJ_TZQ: TFloatField;
    qryInfoHYGDXBT_TZQ: TFloatField;
    qryInfoDFBCLXDY_TZQ: TFloatField;
    qryInfoHLF_TZQ: TFloatField;
    qryInfoTZJ_TZQ: TFloatField;
    qryInfoYLDYHJ_TZH: TFloatField;
    qryInfoJCYLJ_TZH: TFloatField;
    qryInfoGDXYLJ_TZH: TFloatField;
    qryInfoGRZHYLJ_TZH: TFloatField;
    qryInfoHYGDXBT_TZH: TFloatField;
    qryInfoDFBCLXDY_TZH: TFloatField;
    qryInfoHLF_TZH: TFloatField;
    qryInfoTZJ_TZH: TFloatField;
    qryInfoYLDYHJ_ZJ: TFloatField;
    qryInfoJCYLJ_ZJ: TFloatField;
    qryInfoGDXYLJ_ZJ: TFloatField;
    qryInfoGRZHYLJ_ZJ: TFloatField;
    qryInfoHYGDXBT_ZJ: TFloatField;
    qryInfoDFBCLXDY_ZJ: TFloatField;
    qryInfoHLF_ZJ: TFloatField;
    qryInfoTZJ_ZJ: TFloatField;
    qryInfoZHYE_SCTZ: TFloatField;
    qryInfoZHZFZE: TFloatField;
    qryInfoZHLXZE: TFloatField;
    qryInfoZHYE_BCTZ: TFloatField;
    QRDBText1: TQRDBText;
    QRDBText2: TQRDBText;
    QRDBText3: TQRDBText;
    QRDBText4: TQRDBText;
    QRDBText6: TQRDBText;
    QRDBText7: TQRDBText;
    QRDBText9: TQRDBText;
    QRDBText10: TQRDBText;
    QRDBText11: TQRDBText;
    QRDBText12: TQRDBText;
    QRDBText13: TQRDBText;
    QRDBText14: TQRDBText;
    QRDBText15: TQRDBText;
    QRDBText16: TQRDBText;
    QRDBText17: TQRDBText;
    QRDBText18: TQRDBText;
    QRDBText19: TQRDBText;
    QRDBText20: TQRDBText;
    QRDBText27: TQRDBText;
    QRDBText5: TQRDBText;
    QRDBText8: TQRDBText;
    QRDBText21: TQRDBText;
    QRDBText22: TQRDBText;
    QRDBText23: TQRDBText;
    QRDBText24: TQRDBText;
    QRDBText25: TQRDBText;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  frmDyhd_dzd: TfrmDyhd_dzd;

implementation

{$R *.DFM}

end.

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -