unit31.dfm

本系统是SQL SERVER的管理系统

object Form31: TForm31
  Left = 185
  Top = 116
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsNone
  Caption = '销售管理---车辆销售'
  ClientHeight = 557
  ClientWidth = 816
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  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 = poScreenCenter
  Visible = True
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object epEfButton1: TepEfButton
    Left = 8
    Top = 528
    Width = 65
    Height = 25
    Transparent = False
    ActiveTextColor = clBlue
    OnClick = epEfButton1Click
    Spacing = 0
    EfCaption = False
    BtnFrameWidth = 3
    BtnColor = clBtnFace
    FrameWidth = 2
    ParentFont = False
    Caption = '首条'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = []
  end
  object epEfButton2: TepEfButton
    Left = 80
    Top = 528
    Width = 65
    Height = 25
    Transparent = False
    ActiveTextColor = clBlue
    OnClick = epEfButton2Click
    Spacing = 0
    EfCaption = False
    BtnFrameWidth = 3
    BtnColor = clBtnFace
    FrameWidth = 2
    ParentFont = False
    Caption = '上一条'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = []
  end
  object epEfButton3: TepEfButton
    Left = 152
    Top = 528
    Width = 65
    Height = 25
    Transparent = False
    ActiveTextColor = clBlue
    OnClick = epEfButton3Click
    Spacing = 0
    EfCaption = False
    BtnFrameWidth = 3
    BtnColor = clBtnFace
    FrameWidth = 2
    ParentFont = False
    Caption = '下一条'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = []
  end
  object epEfButton4: TepEfButton
    Left = 224
    Top = 528
    Width = 65
    Height = 25
    Transparent = False
    ActiveTextColor = clBlue
    OnClick = epEfButton4Click
    Spacing = 0
    EfCaption = False
    BtnFrameWidth = 3
    BtnColor = clBtnFace
    FrameWidth = 2
    ParentFont = False
    Caption = '尾条'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = []
  end
  object epEfButton5: TepEfButton
    Left = 296
    Top = 528
    Width = 65
    Height = 25
    Transparent = False
    ActiveTextColor = clBlue
    OnClick = epEfButton5Click
    Spacing = 0
    EfCaption = False
    BtnFrameWidth = 3
    BtnColor = clBtnFace
    FrameWidth = 2
    ParentFont = False
    Caption = '刷新'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = []
  end
  object epEfTrBtn1: TepEfTrBtn
    Left = 384
    Top = 528
    Width = 65
    Height = 25
    Transparent = True
    ActiveTextColor = clBackground
    OnClick = epEfTrBtn1Click
    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 epEfTrBtn2: TepEfTrBtn
    Left = 456
    Top = 528
    Width = 65
    Height = 25
    Transparent = True
    ActiveTextColor = clBackground
    OnClick = epEfTrBtn2Click
    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 epEfTrBtn3: TepEfTrBtn
    Left = 528
    Top = 528
    Width = 65
    Height = 25
    Transparent = True
    ActiveTextColor = clBackground
    OnClick = epEfTrBtn3Click
    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 epEfTrBtn4: TepEfTrBtn
    Left = 600
    Top = 528
    Width = 65
    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 epEfTrBtn5: TepEfTrBtn
    Left = 672
    Top = 528
    Width = 65
    Height = 25
    Transparent = True
    ActiveTextColor = clBackground
    OnClick = epEfTrBtn5Click
    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 epEfTrBtn6: TepEfTrBtn
    Left = 744
    Top = 528
    Width = 65
    Height = 25
    Transparent = True
    ActiveTextColor = clBackground
    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 DBGrid1: TDBGrid
    Left = 0
    Top = 0
    Width = 817
    Height = 473
    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
      end
      item
        Expanded = False
        FieldName = 'spring'
        Title.Caption = '车辆信息--车辆来源'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'cmemo'
        Title.Caption = '车辆信息--备注（车辆状况）'
        Width = 500
        Visible = True
      end>
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 475
    Width = 816
    Height = 81
    Caption = '查询'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 48
      Top = 16
      Width = 80
      Height = 16
      Caption = '查询项目：'
    end
    object Label2: TLabel
      Left = 48
      Top = 48
      Width = 72
      Height = 16
      Caption = '查询条件:'
    end
    object Label3: TLabel
      Left = 280
      Top = 48
      Width = 16
      Height = 16
      Caption = '到'
    end
    object epEfTrBtn7: TepEfTrBtn
      Left = 680
      Top = 48
      Width = 75
      Height = 25
      Transparent = True
      ActiveTextColor = clBackground
      OnClick = epEfTrBtn7Click
      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 epEfTrBtn8: TepEfTrBtn
      Left = 592
      Top = 48
      Width = 75
      Height = 25
      Transparent = True
      ActiveTextColor = clBackground
      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 FlatComboBox1: TFlatComboBox
      Left = 128
      Top = 16
      Width = 145
      Height = 24
      Style = csDropDownList
      Color = clWindow
      ItemHeight = 16
      Items.Strings = (
        '请选择'
        '车型'
        '颜色'
        '底盘号'
        '车牌号'
        '发动机号'
        '车辆来源'
        '车主姓名'
        '联系电话'
        '车辆序列号'
        '合同序列号'
        '到车日期段'
        '销售时间段'
        '车主身份证号')
      TabOrder = 0
      ItemIndex = -1
      OnChange = FlatComboBox1Change
      OnKeyDown = FormKeyDown
    end
    object FlatComboBox2: TFlatComboBox
      Left = 128
      Top = 48
      Width = 145
      Height = 24
      Color = clWindow
      ItemHeight = 16
      TabOrder = 1
      Text = 'FlatComboBox2'
      ItemIndex = -1
      OnEnter = FlatComboBox2Enter
    end
    object FlatEdit1: TFlatEdit
      Left = 128
      Top = 48
      Width = 145
      Height = 22
      ColorFlat = clBtnFace
      ParentColor = True
      TabOrder = 2
      Text = 'FlatEdit1'
    end
    object DateTimePicker1: TDateTimePicker
      Left = 128
      Top = 48
      Width = 145
      Height = 24
      CalAlignment = dtaLeft
      Date = 37344
      Time = 37344
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 3
      OnKeyDown = FormKeyDown
    end
    object DateTimePicker2: TDateTimePicker
      Left = 304
      Top = 48
      Width = 145
      Height = 24
      CalAlignment = dtaLeft
      Date = 37344
      Time = 37344
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 4
      OnKeyDown = FormKeyDown
    end
  end
end