⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 esqcwh.dfm

📁 Delphi实战演练一书的配套光盘
💻 DFM
字号:
object EsqcWhFrm: TEsqcWhFrm
  Left = 157
  Top = 29
  Width = 659
  Height = 479
  Caption = '二手汽车数据维护'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 8
    Top = 4
    Width = 633
    Height = 161
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = '幼圆'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = '编号'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '品牌'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '型号'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '颜色'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '排气量'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '车辆类型'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '载客人数'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '载重量'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '车牌号'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '出厂日期'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '购买日期'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '行驶公里'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '报价'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '车主姓名'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '身份证号'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '联系电话'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '手机'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '登记日期'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '截止日期'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = '售出标记'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -16
        Title.Font.Name = '幼圆'
        Title.Font.Style = []
        Visible = True
      end>
  end
  object DBNavigator1: TDBNavigator
    Left = 8
    Top = 420
    Width = 520
    Height = 25
    DataSource = DataSource1
    TabOrder = 1
  end
  object GroupBox4: TGroupBox
    Left = 7
    Top = 173
    Width = 242
    Height = 239
    Caption = '票证情况'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = '幼圆'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    object DBCheckBox10: TDBCheckBox
      Left = 15
      Top = 205
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '年检发票'
      DataField = '年检'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBCheckBox9: TDBCheckBox
      Left = 15
      Top = 185
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '养路费发票'
      DataField = '养路费'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBCheckBox8: TDBCheckBox
      Left = 15
      Top = 165
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '印花税'
      DataField = '印花税'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBCheckBox7: TDBCheckBox
      Left = 15
      Top = 145
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '保险税发票'
      DataField = '保险税'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBCheckBox6: TDBCheckBox
      Left = 15
      Top = 125
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '停车证'
      DataField = '停车证'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 4
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBCheckBox5: TDBCheckBox
      Left = 15
      Top = 104
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '购车发票'
      DataField = '购车发票'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBCheckBox4: TDBCheckBox
      Left = 15
      Top = 84
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '机动车备案卡'
      DataField = '备案卡'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 6
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBCheckBox3: TDBCheckBox
      Left = 15
      Top = 64
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '车船使用税完税凭证'
      DataField = '完税凭证'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 7
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBCheckBox2: TDBCheckBox
      Left = 15
      Top = 44
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '车辆购置附加费凭证及发票'
      DataField = '附加费'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 8
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object DBCheckBox1: TDBCheckBox
      Left = 15
      Top = 24
      Width = 212
      Height = 17
      Alignment = taLeftJustify
      Caption = '机动车行驶执照'
      DataField = '行驶执照'
      DataSource = DataSource1
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -15
      Font.Name = '幼圆'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 9
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
  end
  object GroupBox1: TGroupBox
    Left = 264
    Top = 172
    Width = 377
    Height = 240
    Caption = '照片'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '幼圆'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    object DBImage1: TDBImage
      Left = 2
      Top = 15
      Width = 373
      Height = 223
      Align = alClient
      Color = clMenu
      DataField = '照片'
      DataSource = DataSource1
      TabOrder = 0
    end
  end
  object BitBtn1: TBitBtn
    Left = 564
    Top = 420
    Width = 75
    Height = 25
    Caption = '退出'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '幼圆'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = BitBtn1Click
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'xxx'
    TableName = 'QiChe.DB'
    Left = 56
    Top = 400
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 88
    Top = 400
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -