unit34.~dfm

本系统是SQL SERVER的管理系统

object Form34: TForm34
  Left = 175
  Top = 138
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsNone
  Caption = '数据统计'
  ClientHeight = 561
  ClientWidth = 814
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = '楷体_GB2312'
  Font.Style = [fsBold]
  FormStyle = fsMDIChild
  Icon.Data = {
    0000010001002020040000000000E80200001600000028000000200000004000
    0000010004000000000000020000000000000000000010000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000077
    7777000000000000000000000000777777777777777700000000000000000000
    00000077777777700000000000000000FFFF77DDDDD777777000000000000FFF
    FFFF777DDDDDDD7777700000000000000000077DDDDDDDDDD777700000000000
    0000000777DDDDDDDDD77700000000000000000000777D777DD7777000000000
    000000000000077F777777770000007770000000000000007777787770000799
    9700000000000000777778C7770009999700000000000000007888CC77700F99
    98700000000000000007CCCCC77000FF9770000000000000000077CCCC777000
    0777000000000000000008CCCC77970000F9700000000000000078FCCCC79970
    707997700000000000007877FCC7F997979999977700000000078777FCC70F99
    9999999998877777777A88877FC700099999999987788887B7AAAAAA77C00009
    999999998877777BB7AAAAAAA7C0779999999999887777BBB7777AAAACC09999
    9999999988777777BBB7777AAC000099999999999877777BBBBB7777AA000000
    99999999987777BBBBBBB77AA0000000009999999877777BBBBBBAA000000000
    0000999998877777BB77F00000000000000000099887777777F000000000FFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFC0FFFFFF0000FFFFFFC01FFFF00007FF8000
    01FFFF80007FFFE0003FFFFC001FFFFF800FC7FFF00783FFF00383FFFC0181FF
    FE01C1FFFF0078FFFF803C7FFF00141FFF000003FE0080000000E0000001E000
    00010000000100000003C0000003F0000007FC00001FFF00007FFFE001FF}
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object PageControl1: TPageControl
    Left = 0
    Top = 80
    Width = 814
    Height = 481
    ActivePage = TabSheet3
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = '楷体_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '车辆库存'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
      object epEfButton11: TepEfButton
        Left = 8
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton11Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '首条'
      end
      object epEfButton12: TepEfButton
        Left = 80
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton12Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '上一条'
      end
      object epEfButton13: TepEfButton
        Left = 152
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton13Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '下一条'
      end
      object epEfButton14: TepEfButton
        Left = 224
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton14Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '尾条'
      end
      object epEfButton15: TepEfButton
        Left = 296
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton15Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '刷新'
      end
      object epEfTrBtn8: TepEfTrBtn
        Left = 536
        Top = 416
        Width = 75
        Height = 25
        Transparent = True
        ActiveTextColor = clBlack
        OnClick = epEfTrBtn8Click
        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 DBGrid1: TDBGrid
        Left = 8
        Top = 8
        Width = 793
        Height = 393
        DataSource = Data.repertoryDataSource1
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = '楷体_GB2312'
        Font.Style = []
        ParentFont = False
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clMaroon
        TitleFont.Height = -16
        TitleFont.Name = '楷体_GB2312'
        TitleFont.Style = []
        OnKeyDown = FormKeyDown
        Columns = <
          item
            Expanded = False
            FieldName = 'number'
            Title.Caption = '序列号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cartype'
            Title.Caption = '车型'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'motor'
            Title.Caption = '发动机号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'chassis'
            Title.Caption = '底盘号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'color'
            Title.Caption = '颜色'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdate'
            Title.Caption = '到车日期'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'spring'
            Title.Caption = '车辆来源'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cmemo'
            Title.Caption = '车辆状况'
            Visible = True
          end>
      end
    end
    object TabSheet2: TTabSheet
      Caption = '销售信息'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ImageIndex = 1
      ParentFont = False
      object epEfButton6: TepEfButton
        Left = 8
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton6Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '首条'
      end
      object epEfButton7: TepEfButton
        Left = 80
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton7Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '上一条'
      end
      object epEfButton8: TepEfButton
        Left = 152
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton8Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '下一条'
      end
      object epEfButton9: TepEfButton
        Left = 224
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton9Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '尾条'
      end
      object epEfButton10: TepEfButton
        Left = 296
        Top = 416
        Width = 65
        Height = 25
        Transparent = False
        ActiveTextColor = clBlue
        OnClick = epEfButton10Click
        Spacing = 0
        EfCaption = False
        BtnFrameWidth = 3
        BtnColor = clBtnFace
        FrameWidth = 2
        Caption = '刷新'
      end
      object epEfTrBtn6: TepEfTrBtn
        Left = 536
        Top = 416
        Width = 75
        Height = 25
        Transparent = True
        ActiveTextColor = clBlack
        OnClick = epEfTrBtn6Click
        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 DBGrid2: TDBGrid
        Left = 8
        Top = 8
        Width = 793
        Height = 393
        DataSource = Data.saleDataSource
        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 = 'cname'
            Title.Caption = '客户名称'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'tel'
            Title.Caption = '联系电话'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'nameno'
            Title.Caption = '身份证号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'address'
            Title.Caption = '地址'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'saledate'
            Title.Caption = '销售时间'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'carno'
            Title.Caption = '车牌号'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'number'
            Title.Caption = '车辆信息（序列号）'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cartype'
            Title.Caption = '车辆信息（车型）'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'motor'
            Title.Caption = '车辆信息（发动机号）'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'chassis'
            Title.Caption = '车辆信息（底盘号）'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'color'
            Title.Caption = '车辆信息（颜色）'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cdate'
            Title.Caption = '车辆来源（到车日期）'
            Visible = True