editlipei.dfm

车辆保险管理系统主要是针对车辆保险业务管理流程而开发的一套先进的计算机管理系统。车辆保险管理系统是专为车辆保险业务员开发的一套应用软件

object lipei: Tlipei
  Left = 175
  Top = 112
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = '增加和修改理赔记录'
  ClientHeight = 330
  ClientWidth = 478
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 24
    Width = 56
    Height = 14
    Caption = '赔案号：'
    FocusControl = DBEdit1
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 136
    Top = 24
    Width = 70
    Height = 14
    Caption = '事故地点：'
    FocusControl = DBEdit2
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 352
    Top = 24
    Width = 70
    Height = 14
    Caption = '处理结果：'
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 16
    Top = 80
    Width = 42
    Height = 14
    Caption = '责任：'
    FocusControl = DBEdit4
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 344
    Top = 96
    Width = 14
    Height = 14
    Caption = '年'
    FocusControl = DBEdit5
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 400
    Top = 96
    Width = 14
    Height = 14
    Caption = '月'
    FocusControl = DBEdit6
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 456
    Top = 96
    Width = 14
    Height = 14
    Caption = '日'
    FocusControl = DBEdit7
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 16
    Top = 128
    Width = 56
    Height = 14
    Caption = '三者险：'
    FocusControl = DBEdit9
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label10: TLabel
    Left = 96
    Top = 128
    Width = 84
    Height = 14
    Caption = '车上责任险：'
    FocusControl = DBEdit10
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label11: TLabel
    Left = 208
    Top = 128
    Width = 56
    Height = 14
    Caption = '车损额：'
    FocusControl = DBEdit11
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label12: TLabel
    Left = 304
    Top = 128
    Width = 42
    Height = 14
    Caption = '总额：'
    FocusControl = DBEdit12
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 200
    Top = 96
    Width = 70
    Height = 14
    Caption = '处理时间：'
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object Label13: TLabel
    Left = 16
    Top = 184
    Width = 63
    Height = 14
    Caption = '备   注：'
    FocusControl = DBEdit9
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
  end
  object DBNavigator1: TDBNavigator
    Left = 152
    Top = 248
    Width = 200
    Height = 25
    DataSource = dm.ds_lipei
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
    Flat = True
    TabOrder = 0
  end
  object DBEdit1: TDBEdit
    Left = 16
    Top = 40
    Width = 105
    Height = 22
    DataField = 'Lipeino'
    DataSource = dm.ds_lipei
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnKeyDown = DBEdit1KeyDown
  end
  object DBEdit2: TDBEdit
    Left = 136
    Top = 40
    Width = 193
    Height = 22
    DataField = 'Accident_spot'
    DataSource = dm.ds_lipei
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnKeyDown = DBEdit2KeyDown
  end
  object DBEdit4: TDBEdit
    Left = 16
    Top = 96
    Width = 177
    Height = 22
    DataField = 'Response'
    DataSource = dm.ds_lipei
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnKeyDown = DBEdit4KeyDown
  end
  object DBEdit5: TDBEdit
    Left = 272
    Top = 96
    Width = 64
    Height = 22
    DataField = 'Accident_year'
    DataSource = dm.ds_lipei
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnKeyDown = DBEdit5KeyDown
  end
  object DBEdit6: TDBEdit
    Left = 360
    Top = 96
    Width = 33
    Height = 22
    DataField = 'Accident_month'
    DataSource = dm.ds_lipei
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnKeyDown = DBEdit6KeyDown
  end
  object DBEdit7: TDBEdit
    Left = 416
    Top = 96
    Width = 33
    Height = 22
    DataField = 'Accident_date'
    DataSource = dm.ds_lipei
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnKeyDown = DBEdit7KeyDown
  end
  object DBEdit8: TDBEdit
    Left = 400
    Top = 256
    Width = 64
    Height = 21
    DataField = 'Carno'
    DataSource = dm.ds_lipei
    TabOrder = 7
    Visible = False
  end
  object DBEdit9: TDBEdit
    Left = 16
    Top = 144
    Width = 73
    Height = 22
    DataField = 'Give_object'
    DataSource = dm.ds_lipei
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    OnKeyDown = DBEdit9KeyDown
  end
  object DBEdit10: TDBEdit
    Left = 96
    Top = 144
    Width = 97
    Height = 22
    DataField = 'Give_person'
    DataSource = dm.ds_lipei
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 9
    OnKeyDown = DBEdit10KeyDown
  end
  object DBEdit11: TDBEdit
    Left = 208
    Top = 144
    Width = 81
    Height = 22
    DataField = 'Give_car'
    DataSource = dm.ds_lipei
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 10
    OnKeyDown = DBEdit11KeyDown
  end
  object DBEdit12: TDBEdit
    Left = 304
    Top = 144
    Width = 89
    Height = 22
    DataField = 'Give_total'
    DataSource = dm.ds_lipei
    DragMode = dmAutomatic
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    ReadOnly = True
    TabOrder = 11
  end
  object DBEdit13: TDBEdit
    Left = 352
    Top = 240
    Width = 121
    Height = 21
    DataField = 'Carno'
    DataSource = dm.ds_car
    TabOrder = 12
    Visible = False
  end
  object BitBtn1: TBitBtn
    Left = 32
    Top = 280
    Width = 81
    Height = 27
    Caption = '保   存'
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 13
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 137
    Top = 280
    Width = 79
    Height = 27
    Caption = '取   消'
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 14
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 241
    Top = 280
    Width = 88
    Height = 27
    Caption = '退   出'
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 15
    OnClick = BitBtn3Click
  end
  object BitBtn4: TBitBtn
    Left = 352
    Top = 280
    Width = 81
    Height = 27
    Caption = '增   加'
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 16
    OnClick = BitBtn4Click
  end
  object DBEdit3: TDBComboBox
    Left = 352
    Top = 40
    Width = 113
    Height = 22
    DataField = 'End_flag'
    DataSource = dm.ds_lipei
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ItemHeight = 14
    Items.Strings = (
      '未处理'
      '已处理')
    ParentFont = False
    TabOrder = 17
    OnKeyDown = DBEdit3KeyDown
  end
  object DBMemo1: TDBMemo
    Left = 96
    Top = 184
    Width = 353
    Height = 49
    DataField = 'Else'
    DataSource = dm.ds_lipei
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -14
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 18
  end
end