fsummoney.dfm

一套BCB６开发的电话管理系统

      FF000000FF000000FF000000FF00000000000000000000000000000000000000
      0000000000000000000000000000000000000000800000000000000000000000
      0000000000000000000000000000000000000000000000000000808080008080
      8000000000000000000000000000000000000000000000000000000080000000
      8000000080000000800000008000000000000000000080808000000000000000
      0000808080000000000000000000FFFFFF00FFFF00000000000000FFFF00FFFF
      FF0000FFFF00FFFFFF00000000000000000000000000FFFFFF00FFFFFF00FFFF
      FF00FFFFFF0000000000FFFFFF00000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000800000000000000000000000
      0000000000000000000000000000000000000000000080808000808080008080
      80000000000000000000000000000000000000000000000000000000FF000000
      8000000080000000800080808000000000000000000000000000FFFFFF000000
      00000000000000000000FFFFFF0000000000FFFF000000000000FFFFFF0000FF
      FF00FFFFFF0000FFFF00FFFFFF0000FFFF00FFFFFF0000000000FFFFFF000000
      000000000000FFFFFF00FFFFFF00000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000800000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      8000000080000000800000000000000000000000000000000000808080000000
      000000000000000000008080800000000000FFFF00000000000000FFFF00FFFF
      FF0000FFFF00FFFFFF00000000000000000000000000000000000000000000FF
      FF0000000000FFFFFF00FFFFFF00000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000800000000000000000000000
      0000000000000000FF000000FF000000FF000000FF000000FF000000FF000000
      FF000000FF000000FF000000FF000000FF000000000000000000000000000000
      800000008000808080000000000000000000000000000000000000000000FFFF
      FF0000000000000000000000000000000000FFFF000000000000FFFFFF0000FF
      FF00FFFFFF0000FFFF00FFFFFF0000FFFF00FFFFFF0000FFFF00FFFFFF000000
      0000FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
      0000FF0000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000800000000000000000000000
      0000000000000000FF000000FF000000FF000000FF000000FF000000FF000000
      FF000000FF000000FF000000FF000000FF000000000000000000000000000000
      FF00000080008080800000000000000000000000000000000000000000008080
      800000000000808080000000000000000000FFFF00000000000000FFFF00FFFF
      FF0000000000000000000000000000000000000000000000000000000000FFFF
      FF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000000000000000FF00
      0000FF0000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000800000000000000000000000
      0000000000008000800080008000800080000000FF000000FF000000FF000000
      FF00800080008000800080008000000000000000000000000000000000000000
      8000000080008080800000000000000000000000000000000000000000008080
      80000000000080808000000000000000000000000000000000000000000000FF
      FF00FFFFFF0000FFFF00000000000000000000FFFF0000000000FFFFFF00FFFF
      FF000000000000000000FFFFFF000000000000000000FF000000FF000000FF00
      0000FF000000FF000000FF000000FF000000FF000000FF000000FF0000000000
      00000000FF000000FF0000000000000000000000800000000000000000000000
      00000000FF000000FF000000FF000000FF008000800080008000800080008000
      80000000FF000000FF00000000000000000000000000000000000000FF000000
      8000000080000000800000000000000000000000000000000000000000000000
      0000000000008080800000000000000000000000000000000000000000000000
      000000000000000000000000000000FFFF0000000000FFFFFF00FFFFFF00FFFF
      FF00FFFFFF00FFFFFF00FFFFFF000000000000000000FF000000FF000000FF00
      0000FF000000FF000000FF000000FF000000FF000000FF000000FF0000000000
      00000000FF000000FF0000000000000000000000800000000000000000000000
      00000000FF000000FF000000FF000000FF008000800080008000800080008000
      80000000FF000000FF0000000000000000000000000000000000000080000000
      80000000FF000000800080808000000000000000000000000000808080000000
      0000FFFFFF0000000000FFFFFF00000000000000000000000000000000000000
      0000000000000000000000FFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
      FF0000000000000000000000000000000000000000000000000000000000FF00
      0000FF0000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000800000000000000000008000
      80000000FF000000FF000000FF000000FF008000800080008000800080008000
      80000000000000000000000000000000000000000000000000000000FF000000
      0000000000000000FF0000008000000000000000000000000000FFFFFF008080
      800000000000FFFFFF0000000000FFFFFF000000000000000000000000000000
      00000000000000FFFF0000000000FFFFFF00FFFFFF000000000000000000FFFF
      FF0000000000FFFFFF00FFFFFF00000000000000000000000000000000000000
      0000FF0000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000800000000000000000000000
      FF00800080008000800080008000800080000000FF000000FF000000FF000000
      FF00000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000008000000000000000000000000000808080000000
      00000000000080808000FFFFFF00808080000000000000000000000000000000
      000000FFFF000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF0000000000FFFFFF0000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000800080000000
      0000000000000000800000000000000000000000000000000000000080000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000080808000000000000000000000000000000000000000
      FF00000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
      FF00000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      000000000000000000000000000000000000424D3E000000000000003E000000
      2800000040000000600000000100010000000000000300000000000000000000
      000000000000000000000000FFFFFF00FFFFFFFFFFFF0000FFFFFFFFFFFF0000
      803FDFFF87C30000803FDFFF87C30000803FEFFF81030000803FF7FF80030000
      F003FDFD82030000F001FE3F82030000F001FFDFC0070000F003FFEBE10F0000
      FFFFFFE7E10F0000803FFF07F38F0000803FFFEFF38F0000803FFFFFFFFF0000
      803FFFFFFFFF0000FFFFFFFFFFFF00000000C0038006FFFF000080010000FF01
      00000000C004FF01000000000140FF01000000000080FF0100000000C004FF01
      000000000140007F00000000C004003F000080010080003F0000E007C0040001
      0000E007014000010000E007C004FF010000E00FF802FF010000E01F0140FF01
      0000E03FF802FFFF0000F07F0280FFFFFFFFFFFFFFFCFFF0FFF81FFFFFF11FF0
      FFF807FFFFC107F081FF81FFFF0381F081FCC07FFC07C070FFFCC01FF007C010
      FFFFE007C00FE000FFFCF0010000F000F7FC0000800F0000E7FFF003E007F000
      8013E00FF803E0008013E03FFE03E030E7FFC0FFFF81C0F0F7F883FFFFE083F0
      FFF88FFFFFF88FF0FFFF3FFFFFFF3FF0FFFF0007FFFFFFFFFFFF0004C001FFFF
      FFFFC30C8031FFFFFFFFC3CD8031FFFFFFFFC3CD8031FFFFE03FC3CD8001FFE7
      E01FC3CD8001C1F3E00FC3CD8001C3FBE007C3CD8FF1C7FBE03FC3CD8FF1CBFB
      E03FC3CD8FF1DCF3F3CFC3CD8FF1FF07FFEFFFC38FF1FFFFFFBFE7E38FF5FFFF
      FFFFE7E38001FFFFFFFFE7E3FFFFFFFFFFDFFF7EFF00FFFFFFCF9001FF00FFFF
      FFC7C003FF00DFCF0003E003FF00CFEF0001E00300008FF70000E00300000757
      0001E00300002767000300010000272B000780000023F3FB000FE0070001F3F5
      001FE00F0000F1F5007FE00F0023F9FA00FFE0270063FCFC01FFC07300C3FCFC
      03FF9E790107FFFFFFFF7EFE03FFFFFFFFFF3FFFFFFFFC00FFF83FFFDFDFFC00
      FFF83FFF9BDF200081FF3FEF89A9000081FC3FCFC1B60000FFFC3F8FC1DD0000
      FFFF3FFFE3DD0000FFFC3800E3EF0000F7FC3800E3EB0000E7FF3000E3EB0000
      80133001C3FBE00080132003C1D5F800E7FF0003D9CAF000F7F80003FDD8E001
      FFF8800FFFFDC403FFFFE42FFFFFEC0700000000000000000000000000000000
      000000000000}
  end
  object CDSSumMoney: TClientDataSet
    Aggregates = <
      item
        Active = True
        Expression = 'sum( TDuration)'
        Visible = False
      end
      item
        Active = True
        Expression = 'sum( charge)'
        Visible = False
      end>
    AggregatesActive = True
    Params = <>
    ProviderName = 'DataSetProvider1'
    Left = 256
    Top = 200
  end
  object DataSource1: TDataSource
    DataSet = CDSSum
    Left = 136
    Top = 120
  end
  object DataSetProvider1: TDataSetProvider
    DataSet = SumCompanyQuery
    Constraints = True
    Left = 224
    Top = 176
  end
  object SumCompanyQuery: TADOQuery
    Connection = DMTelSys.TelSysADOConnection
    OnCalcFields = SumCompanyQueryCalcFields
    Parameters = <>
    SQL.Strings = (
      'select top 10 A.gscode, gsname, charge, duration'
      'from GS_Bill A left join Company B'
      'on A.gscode = B.gscode')
    Left = 256
    Top = 168
    object SumCompanyQuerygscode: TWideStringField
      FieldName = 'gscode'
      Size = 2
    end
    object SumCompanyQuerycharge: TBCDField
      FieldName = 'charge'
      Precision = 10
    end
    object SumCompanyQueryduration: TStringField
      FieldName = 'duration'
      Size = 10
    end
    object SumCompanyQueryTDuration: TIntegerField
      FieldKind = fkCalculated
      FieldName = 'TDuration'
      Calculated = True
    end
  end
  object CDSSum: TClientDataSet
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'CompanyName'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'TotalTime'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'TotalMoney'
        DataType = ftFloat
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 168
    Top = 112
  end
end