unit34.~dfm

本系统是SQL SERVER的管理系统

          end
          item
            Expanded = False
            FieldName = 'spring'
            Title.Caption = '车辆信息（车辆来源）'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cmemo'
            Title.Caption = '车辆信息（车辆状况）'
            Visible = True
          end>
      end
    end
    object TabSheet3: TTabSheet
      Caption = '利润信息'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ImageIndex = 2
      ParentFont = False
      object epEfButton1: TepEfButton
        Left = 8
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton1Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '首条'
      end
      object epEfButton2: TepEfButton
        Left = 80
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton2Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '上一条'
      end
      object epEfButton3: TepEfButton
        Left = 152
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton3Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '下一条'
      end
      object epEfButton4: TepEfButton
        Left = 224
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton4Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '尾条'
      end
      object epEfButton5: TepEfButton
        Left = 296
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton5Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '刷新'
      end
      object epEfTrBtn4: TepEfTrBtn
        Left = 536
        Top = 416
        Width = 75
        Height = 25
        Transparent = True
        ActiveTextColor = clBackground
        OnClick = epEfTrBtn4Click
        Spacing = 0
        Noise = False
        FrameWidth = 2
        Caption = '报表'
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = '楷体_GB2312'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object DBGrid3: TDBGrid
        Left = 8
        Top = 8
        Width = 793
        Height = 393
        DataSource = Data.profitDataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = '楷体_GB2312'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clMaroon
        TitleFont.Height = -16
        TitleFont.Name = '楷体_GB2312'
        TitleFont.Style = []
        OnKeyDown = FormKeyDown
        Columns = <
          item
            Expanded = False
            FieldName = 'comno'
            Title.Caption = '合同号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'salepr'
            Title.Caption = '销售总价格'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'putpr'
            Title.Caption = '入户费用'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'loadpr'
            Title.Caption = '车辆装修费用'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'otherpr'
            Title.Caption = '其它费用'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'passmon'
            Title.Caption = '汇款金额'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'salemon'
            Title.Caption = '销售利润'
            Visible = True
          end>
      end
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 0
    Width = 814
    Height = 81
    Caption = '统计'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 56
      Top = 16
      Width = 80
      Height = 16
      Caption = '统计项目：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 216
      Top = 48
      Width = 16
      Height = 16
      Caption = '年'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 56
      Top = 48
      Width = 72
      Height = 16
      Caption = '统计条件:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 296
      Top = 48
      Width = 20
      Height = 19
      Caption = '季'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -19
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object epEfTrBtn1: TepEfTrBtn
      Left = 624
      Top = 32
      Width = 75
      Height = 25
      Transparent = True
      ActiveTextColor = clBackground
      OnClick = epEfTrBtn1Click
      Spacing = 0
      Noise = False
      FrameWidth = 2
      Caption = '确认'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object epEfTrBtn2: TepEfTrBtn
      Left = 720
      Top = 32
      Width = 75
      Height = 25
      Transparent = True
      ActiveTextColor = clBackground
      OnClick = epEfTrBtn2Click
      Spacing = 0
      Noise = False
      FrameWidth = 2
      Caption = '关闭'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 296
      Top = 48
      Width = 16
      Height = 16
      Caption = '月'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object FlatComboBox1: TFlatComboBox
      Left = 136
      Top = 16
      Width = 129
      Height = 24
      Style = csDropDownList
      Color = clWindow
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ItemHeight = 16
      Items.Strings = (
        '请选择'
        '按年度统计'
        '按季度统计'
        '按月度统计')
      ParentFont = False
      TabOrder = 0
      Text = '请选择'
      ItemIndex = 0
      OnChange = FlatComboBox1Change
      OnKeyDown = FormKeyDown
    end
    object FlatComboBox2: TFlatComboBox
      Left = 136
      Top = 48
      Width = 73
      Height = 24
      Style = csDropDownList
      Color = clWindow
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ItemHeight = 16
      Items.Strings = (
        '1980'
        '1981'
        '1982'
        '1983'
        '1984'
        '1985'
        '1986'
        '1987'
        '1988'
        '1989'
        '1990'
        '1991'
        '1992'
        '1993'
        '1994'
        '1995'
        '1996'
        '1997'
        '1998'
        '1999'
        '2000'
        '2001'
        '2002'
        '2003'
        '2004'
        '2005'
        '2006'
        '2007'
        '2008'
        '2009'
        '2010'
        '2011'
        '2012')
      ParentFont = False
      TabOrder = 1
      Text = '2002'
      ItemIndex = 22
      OnKeyDown = FormKeyDown
    end
    object FlatComboBox3: TFlatComboBox
      Left = 240
      Top = 48
      Width = 49
      Height = 24
      Style = csDropDownList
      Color = clWindow
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ItemHeight = 16
      Items.Strings = (
        '春'
        '夏'
        '秋'
        '冬')
      ParentFont = False
      TabOrder = 2
      ItemIndex = -1
    end
    object FlatComboBox4: TFlatComboBox
      Left = 240
      Top = 48
      Width = 49
      Height = 24
      Style = csDropDownList
      Color = clWindow
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ItemHeight = 16
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10'
        '11'
        '12')
      ParentFont = False
      TabOrder = 3
      ItemIndex = -1
      OnKeyDown = FormKeyDown
    end
  end
end