charge_report_400v_f.dfm

县级供电企业电费核算源码, 在客户处正常运行8年以上, Delphi 5开发,数据库为Interbase/Firebird, 深入使用Procedure和Trigger等, 对入门者具有很好的参考价值

        mmLeft = 126736
        mmTop = 12171
        mmWidth = 2381
        BandType = 0
      end
      object ppLine6: TppLine
        UserName = 'Line6'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 7938
        mmLeft = 153459
        mmTop = 12171
        mmWidth = 2381
        BandType = 0
      end
      object ppLine12: TppLine
        UserName = 'Line12'
        Pen.Style = psDot
        Weight = 0.75
        mmHeight = 265
        mmLeft = 5821
        mmTop = 19844
        mmWidth = 190236
        BandType = 0
      end
    end
    object ppDetailBand1: TppDetailBand
      mmBottomOffset = 0
      mmHeight = 8202
      mmPrintPosition = 0
      object ppDBText1: TppDBText
        UserName = 'DBText1'
        DataField = 'F_HOUSE_NO'
        DataPipeline = DBP_400V
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 5821
        mmTop = 2381
        mmWidth = 21696
        BandType = 4
      end
      object ppDBText2: TppDBText
        UserName = 'DBText2'
        DataField = 'F_HOUSE_NAME'
        DataPipeline = DBP_400V
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 32544
        mmTop = 2381
        mmWidth = 39423
        BandType = 4
      end
      object ppDBText3: TppDBText
        UserName = 'DBText3'
        BlankWhenZero = True
        DataField = 'F_FEEAMOUNT'
        DataPipeline = DBP_400V
        DisplayFormat = '0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 80963
        mmTop = 2381
        mmWidth = 18521
        BandType = 4
      end
      object ppDBText4: TppDBText
        UserName = 'DBText4'
        BlankWhenZero = True
        DataField = 'F_LAST_BALANCE'
        DataPipeline = DBP_400V
        DisplayFormat = '0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 108744
        mmTop = 2381
        mmWidth = 14288
        BandType = 4
      end
      object ppDBText5: TppDBText
        UserName = 'DBText5'
        BlankWhenZero = True
        DataField = 'F_BALANCE'
        DataPipeline = DBP_400V
        DisplayFormat = '0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 159015
        mmTop = 2646
        mmWidth = 17198
        BandType = 4
      end
      object ppDBText8: TppDBText
        UserName = 'DBText8'
        BlankWhenZero = True
        DataField = 'F_ACTUAL_RECEIVE'
        DataPipeline = DBP_400V
        DisplayFormat = '0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 133086
        mmTop = 2381
        mmWidth = 17198
        BandType = 4
      end
      object ppLine1: TppLine
        UserName = 'Line1'
        Pen.Style = psDot
        Weight = 0.75
        mmHeight = 265
        mmLeft = 3969
        mmTop = 7144
        mmWidth = 190236
        BandType = 4
      end
      object ppLine7: TppLine
        UserName = 'Line7'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 7938
        mmLeft = 30163
        mmTop = 265
        mmWidth = 2381
        BandType = 4
      end
      object ppLine8: TppLine
        UserName = 'Line8'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 7938
        mmLeft = 75936
        mmTop = 265
        mmWidth = 2381
        BandType = 4
      end
      object ppLine9: TppLine
        UserName = 'Line9'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 7938
        mmLeft = 103452
        mmTop = 265
        mmWidth = 2381
        BandType = 4
      end
      object ppLine10: TppLine
        UserName = 'Line10'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 7938
        mmLeft = 126736
        mmTop = 265
        mmWidth = 2381
        BandType = 4
      end
      object ppLine11: TppLine
        UserName = 'Line11'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 7938
        mmLeft = 153459
        mmTop = 265
        mmWidth = 2381
        BandType = 4
      end
    end
    object ppFooterBand1: TppFooterBand
      mmBottomOffset = 0
      mmHeight = 11642
      mmPrintPosition = 0
    end
    object ppSummaryBand1: TppSummaryBand
      mmBottomOffset = 0
      mmHeight = 8996
      mmPrintPosition = 0
      object ppDBCalc1: TppDBCalc
        UserName = 'DBCalc1'
        DataField = 'F_FEEAMOUNT'
        DataPipeline = DBP_400V
        DisplayFormat = '0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 80698
        mmTop = 2646
        mmWidth = 18785
        BandType = 7
      end
      object ppDBCalc2: TppDBCalc
        UserName = 'DBCalc2'
        DataField = 'F_LAST_BALANCE'
        DataPipeline = DBP_400V
        DisplayFormat = '0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 105304
        mmTop = 2646
        mmWidth = 18785
        BandType = 7
      end
      object ppDBCalc3: TppDBCalc
        UserName = 'DBCalc3'
        DataField = 'F_ACTUAL_RECEIVE'
        DataPipeline = DBP_400V
        DisplayFormat = '0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 131498
        mmTop = 2646
        mmWidth = 18785
        BandType = 7
      end
      object ppDBCalc4: TppDBCalc
        UserName = 'DBCalc4'
        DataField = 'F_BALANCE'
        DataPipeline = DBP_400V
        DisplayFormat = '0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 157427
        mmTop = 2646
        mmWidth = 18785
        BandType = 7
      end
      object ppDBCalc5: TppDBCalc
        UserName = 'DBCalc5'
        DataPipeline = DBP_400V
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        DBCalcType = dcCount
        DataPipelineName = 'DBP_400V'
        mmHeight = 3969
        mmLeft = 15610
        mmTop = 2646
        mmWidth = 11642
        BandType = 7
      end
      object ppLine13: TppLine
        UserName = 'Line13'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 9525
        mmLeft = 30163
        mmTop = 0
        mmWidth = 2381
        BandType = 7
      end
      object ppLine14: TppLine
        UserName = 'Line14'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 9525
        mmLeft = 75936
        mmTop = 0
        mmWidth = 2381
        BandType = 7
      end
      object ppLine15: TppLine
        UserName = 'Line15'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 9525
        mmLeft = 103452
        mmTop = 0
        mmWidth = 2381
        BandType = 7
      end
      object ppLine16: TppLine
        UserName = 'Line101'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 9525
        mmLeft = 126736
        mmTop = 0
        mmWidth = 2381
        BandType = 7
      end
      object ppLine17: TppLine
        UserName = 'Line17'
        Pen.Style = psDot
        Position = lpLeft
        Weight = 0.75
        mmHeight = 9525
        mmLeft = 153459
        mmTop = 0
        mmWidth = 2381
        BandType = 7
      end
      object ppLabel6: TppLabel
        UserName = 'Label6'
        Caption = '户数'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = '宋体'
        Font.Size = 10
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        mmHeight = 4022
        mmLeft = 7610
        mmTop = 2646
        mmWidth = 7027
        BandType = 7
      end
    end
    object ppParameterList1: TppParameterList
    end
  end
  object DBP_400V: TppDBPipeline
    DataSource = Ds_400V
    UserName = 'DBP_400V'
    Left = 148
    Top = 168
    object DBP_400VppField1: TppField
      Alignment = taRightJustify
      FieldAlias = 'F_FEEAMOUNT'
      FieldName = 'F_FEEAMOUNT'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 0
      Position = 0
    end
    object DBP_400VppField2: TppField
      FieldAlias = 'F_POSITION'
      FieldName = 'F_POSITION'
      FieldLength = 30
      DisplayWidth = 30
      Position = 1
    end
    object DBP_400VppField3: TppField
      FieldAlias = 'F_HOUSE_NO'
      FieldName = 'F_HOUSE_NO'
      FieldLength = 12
      DisplayWidth = 12
      Position = 2
    end
    object DBP_400VppField4: TppField
      FieldAlias = 'F_TRANSFER_NO'
      FieldName = 'F_TRANSFER_NO'
      FieldLength = 6
      DisplayWidth = 6
      Position = 3
    end
    object DBP_400VppField5: TppField
      FieldAlias = 'F_VOLUME_NO'
      FieldName = 'F_VOLUME_NO'
      FieldLength = 1
      DisplayWidth = 1
      Position = 4
    end
    object DBP_400VppField6: TppField
      FieldAlias = 'F_VILLAGE_NO'
      FieldName = 'F_VILLAGE_NO'
      FieldLength = 5
      DisplayWidth = 5
      Position = 5
    end
    object DBP_400VppField7: TppField
      FieldAlias = 'F_HOUSE_NAME'
      FieldName = 'F_HOUSE_NAME'
      FieldLength = 20
      DisplayWidth = 20
      Position = 6
    end
    object DBP_400VppField8: TppField
      FieldAlias = 'F_POSITION_1'
      FieldName = 'F_POSITION_1'
      FieldLength = 10
      DisplayWidth = 10
      Position = 7
    end