uyldyzjtz_1.dfm

来自「行业应急系统 包括: 应急系统（待遇核发） 发放系统 开」· DFM 代码 · 共 2,248 行 · 第 1/4 页

DFM
2,248 行
字号
1234
        Font.Name = '宋体'
        Font.Style = []
        Mask = '0.00'
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRDBText15: TQRDBText
        Left = 945
        Top = 480
        Width = 63
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          2500.3125
          1270
          166.6875)
        Alignment = taRightJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'DFBCLXDY_JS'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        Mask = '0.00'
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRDBText16: TQRDBText
        Left = 1017
        Top = 480
        Width = 57
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          2690.8125
          1270
          150.8125)
        Alignment = taRightJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'JCYLJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        Mask = '0.00'
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRDBText17: TQRDBText
        Left = 1093
        Top = 480
        Width = 57
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          2891.89583333333
          1270
          150.8125)
        Alignment = taRightJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'GDXYLJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        Mask = '0.00'
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRDBText18: TQRDBText
        Left = 1157
        Top = 480
        Width = 62
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          3061.22916666667
          1270
          164.041666666667)
        Alignment = taRightJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'GRZHYLJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        Mask = '0.00'
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRDBText19: TQRDBText
        Left = 1232
        Top = 480
        Width = 58
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          3259.66666666667
          1270
          153.458333333333)
        Alignment = taRightJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'HLF'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        Mask = '0.00'
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRDBText20: TQRDBText
        Left = 1307
        Top = 480
        Width = 68
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          3458.10416666667
          1270
          179.916666666667)
        Alignment = taRightJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'GRZHYLJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        Mask = '0.00'
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRDBText22: TQRDBText
        Left = 1387
        Top = 480
        Width = 58
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          3669.77083333333
          1270
          153.458333333333)
        Alignment = taRightJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'DFBCLXDY'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        Mask = '0.00'
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRDBText23: TQRDBText
        Left = 1188
        Top = 514
        Width = 33
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          3143.25
          1359.95833333333
          87.3125)
        Alignment = taCenter
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'BYHJ'
        Mask = '###,###,##0.00'
        Transparent = False
        WordWrap = True
        FontSize = 11
      end
      object QRDBText24: TQRDBText
        Left = 751
        Top = 514
        Width = 41
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          1987.02083333333
          1359.95833333333
          108.479166666667)
        Alignment = taCenter
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'HJ_JS'
        Mask = '###,###,##0.00'
        Transparent = False
        WordWrap = True
        FontSize = 11
      end
      object QRDBText25: TQRDBText
        Left = 290
        Top = 514
        Width = 41
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          767.291666666667
          1359.95833333333
          108.479166666667)
        Alignment = taCenter
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'HJ_ZJ'
        Mask = '###,###,##0.00'
        Transparent = False
        WordWrap = True
        FontSize = 11
      end
      object QRDBText26: TQRDBText
        Left = 487
        Top = 482
        Width = 73
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          1288.52083333333
          1275.29166666667
          193.145833333333)
        Alignment = taRightJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'DFBCLXDY_ZJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        Mask = '0.00'
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 9
      end
      object QRLabel44: TQRLabel
        Left = 686
        Top = 88
        Width = 261
        Height = 22
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          58.2083333333333
          1815.04166666667
          232.833333333333
          690.5625)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = '长 期 待 遇 增 减 台 帐'
        Color = clWhite
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -21
        Font.Name = '宋体'
        Font.Style = [fsBold]
        ParentFont = False
        Transparent = False
        WordWrap = True
        FontSize = 16
      end
      object QRSysData1: TQRSysData
        Left = 711
        Top = 876
        Width = 57
        Height = 16
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          42.3333333333333
          1881.1875
          2317.75
          150.8125)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        Color = clWhite
        Data = qrsDate
        OnPrint = QRSysData1Print
        Transparent = False
        FontSize = 11
      end
      object QRDBText9: TQRDBText
        Left = 174
        Top = 363
        Width = 33
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          460.375
          960.4375
          87.3125)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = qryReport
        DataField = 'DWSL'
        OnPrint = QRDBText9Print
        Transparent = False
        WordWrap = True
        FontSize = 11
      end
    end
    object QRLabel1: TQRLabel
      Left = 636
      Top = 129
      Width = 84
      Height = 20
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      Size.Values = (
        52.9166666666667
        1682.75
        341.3125
        222.25)
      Alignment = taLeftJustify
      AlignToBand = False
      AutoSize = True
      AutoStretch = False
      Caption = '离 退 休'
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = '宋体'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = False
      WordWrap = True
      FontSize = 14
    end
  end
  object qryReport: TQuery
    DatabaseName = 'MainDB'
    SQL.Strings = (
      '----养老待遇增减台帐_合计tYLDYZJTZ_HJ_REP'
      'Select * '
      'From tYLDYZJTZ_HJ_REP')
    Left = 78
    Top = 34
    object qryReportYJRQ: TDateTimeField
      FieldName = 'YJRQ'
      DisplayFormat = 'yyyy-mm-dd'
    end
    object qryReportBH: TStringField
      FieldName = 'BH'
      Size = 30
    end
    object qryReportDWSL: TFloatField
      FieldName = 'DWSL'
    end
    object qryReportJCYLJ_ZJ: TFloatField
      FieldName = 'JCYLJ_ZJ'
    end
    object qryReportGDXYLJ_ZJ: TFloatField
      FieldName = 'GDXYLJ_ZJ'
    end
    object qryReportGRZHYLJ_ZJ: TFloatField
      FieldName = 'GRZHYLJ_ZJ'
    end
    object qryReportHYGDXBT_ZJ: TFloatField
      FieldName = 'HYGDXBT_ZJ'
    end
    object qryReportTZJ_ZJ: TFloatField
      FieldName = 'TZJ_ZJ'
    end
    object qryReportHLF_ZJ: TFloatField
      FieldName = 'HLF_ZJ'
    end
    object qryReportDFBCLXDY_ZJ: TFloatField
      FieldName = 'DFBCLXDY_ZJ'
    end
    object qryReportHJ_ZJ: TFloatField
      FieldName = 'HJ_ZJ'
    end
    object qryReportJCYLJ_JS: TFloatField
      FieldName = 'JCYLJ_JS'
    end
    object qryReportGDXYLJ_JS: TFloatField
      FieldName = 'GDXYLJ_JS'
    end
    object qryReportGRZHYLJ_JS: TFloatField
      FieldName = 'GRZHYLJ_JS'
    end
    object qryReportHYGDXBT_JS: TFloatField
      FieldName = 'HYGDXBT_JS'
    end
    object qryReportTZJ_JS: TFloatField
      FieldName = 'TZJ_JS'
    end
    object qryReportHLF_JS: TFloatField
      FieldName = 'HLF_JS'
    end
    object qryReportDFBCLXDY_JS: TFloatField
      FieldName = 'DFBCLXDY_JS'
    end
    object qryReportHJ_JS: TFloatField
      FieldName = 'HJ_JS'
    end
    object qryReportJCYLJ: TFloatField
      FieldName = 'JCYLJ'
    end
    object qryReportGDXYLJ: TFloatField
      FieldName = 'GDXYLJ'
    end
    object qryReportGRZHYLJ: TFloatField
      FieldName = 'GRZHYLJ'
    end
    object qryReportHYGDXBT: TFloatField
      FieldName = 'HYGDXBT'
    end
    object qryReportTZJ: TFloatField
      FieldName = 'TZJ'
    end
    object qryReportHLF: TFloatField
      FieldName = 'HLF'
    end
    object qryReportDFBCLXDY: TFloatField
      FieldName = 'DFBCLXDY'
    end
    object qryReportBYHJ: TFloatField
      FieldName = 'BYHJ'
    end
  end
end
1234

uyldyzjtz_1.dfm - 源码说明

本页面展示了「行业应急系统 包括: 应急系统（待遇核发） 发放系统 开发环境:Delphi5 (sp1)+ Oracle 8.05 MultiExport是一个可以将数据按指定字段倒出」中的 uyldyzjtz_1.dfm 源码文件，采用 DFM 编程语言编写，共 2,248 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与应急系统相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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