📄 editbaodan.dfm
字号:
object baodan: Tbaodan
Left = 99
Top = 129
AutoScroll = False
BorderIcons = []
Caption = '增加和修改保单记录'
ClientHeight = 365
ClientWidth = 679
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 32
Top = 16
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 Label3: TLabel
Left = 144
Top = 64
Width = 14
Height = 14
Caption = '年'
FocusControl = DBEdit3
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 208
Top = 64
Width = 14
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 = 272
Top = 64
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 = 408
Top = 64
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 = 480
Top = 64
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 Label8: TLabel
Left = 544
Top = 64
Width = 14
Height = 14
Caption = '日'
FocusControl = DBEdit8
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 32
Top = 64
Width = 56
Height = 14
Caption = '生效日:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 296
Top = 64
Width = 56
Height = 14
Caption = '到期日:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 296
Top = 16
Width = 56
Height = 14
Caption = '联系人:'
FocusControl = DBEdit2
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 16
Top = 40
Width = 84
Height = 14
Caption = '系统内编号:'
FocusControl = DBEdit9
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Visible = False
end
object Label12: TLabel
Left = 16
Top = 112
Width = 56
Height = 14
Caption = '车牌号:'
FocusControl = DBEdit10
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 184
Top = 112
Width = 42
Height = 14
Caption = '车名:'
FocusControl = DBEdit11
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 272
Top = 112
Width = 42
Height = 14
Caption = '车型:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 400
Top = 112
Width = 42
Height = 14
Caption = '性质:'
FocusControl = DBEdit13
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 32
Top = 232
Width = 42
Height = 14
Caption = '备注:'
FocusControl = DBMemo1
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label18: TLabel
Left = 16
Top = 168
Width = 56
Height = 14
Caption = '车损险:'
FocusControl = DBEdit15
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 128
Top = 168
Width = 56
Height = 14
Caption = '盗抢险:'
FocusControl = DBEdit16
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label20: TLabel
Left = 248
Top = 168
Width = 56
Height = 14
Caption = '玻璃险:'
FocusControl = DBEdit17
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label21: TLabel
Left = 328
Top = 168
Width = 56
Height = 14
Caption = '三者险:'
FocusControl = DBEdit18
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label22: TLabel
Left = 568
Top = 168
Width = 56
Height = 14
Caption = '其余险:'
FocusControl = DBEdit19
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Bevel1: TBevel
Left = 8
Top = 104
Width = 657
Height = 177
Shape = bsFrame
Style = bsRaised
end
object Label17: TLabel
Left = 536
Top = 112
Width = 84
Height = 14
Caption = '优惠(小数)'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label23: TLabel
Left = 448
Top = 168
Width = 84
Height = 14
Caption = '车上责任险:'
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object DBEdit1: TDBEdit
Left = 96
Top = 16
Width = 185
Height = 22
DataField = 'Baodanno'
DataSource = dm.ds_baodan
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
OnKeyDown = DBEdit1KeyDown
end
object DBEdit3: TDBEdit
Left = 96
Top = 64
Width = 41
Height = 22
DataField = 'Beginyear'
DataSource = dm.ds_baodan
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 1
OnKeyDown = DBEdit3KeyDown
end
object DBEdit4: TDBEdit
Left = 168
Top = 64
Width = 41
Height = 22
DataField = 'Beginmonth'
DataSource = dm.ds_baodan
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 2
OnKeyDown = DBEdit4KeyDown
end
object DBEdit5: TDBEdit
Left = 232
Top = 64
Width = 33
Height = 22
DataField = 'Begindate'
DataSource = dm.ds_baodan
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -14
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -