📄 unit7.dfm
字号:
Width = 94
Height = 21
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
TabOrder = 9
OnKeyDown = Edit4KeyDown
end
object ComboBox1: TComboBox
Left = 339
Top = 50
Width = 102
Height = 21
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
ItemHeight = 13
TabOrder = 0
OnKeyDown = ComboBox1KeyDown
Items.Strings = (
'select class_name from class')
end
object ComboBox2: TComboBox
Left = 595
Top = 50
Width = 102
Height = 21
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
ItemHeight = 13
TabOrder = 1
OnKeyDown = ComboBox2KeyDown
end
object Edit5: TEdit
Left = 121
Top = 79
Width = 102
Height = 21
Enabled = False
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
TabOrder = 2
OnKeyDown = Edit5KeyDown
OnKeyPress = Edit5KeyPress
end
object DateTimePicker1: TDateTimePicker
Left = 122
Top = 112
Width = 102
Height = 21
Date = 38832.000000000000000000
Time = 38832.000000000000000000
Color = clWhite
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
ParentFont = False
TabOrder = 3
OnKeyDown = DateTimePicker1KeyDown
end
object Button4: TButton
Left = 245
Top = 208
Width = 73
Height = 33
Caption = #25552#20132
Enabled = False
TabOrder = 4
OnClick = Button4Click
end
object Button8: TButton
Left = 421
Top = 208
Width = 73
Height = 33
Caption = #21462#28040
Enabled = False
TabOrder = 5
OnClick = Button8Click
end
object DateTimePicker2: TDateTimePicker
Left = 340
Top = 84
Width = 102
Height = 21
Date = 38832.000000000000000000
Time = 38832.000000000000000000
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
TabOrder = 10
end
object ComboBox3: TComboBox
Left = 594
Top = 84
Width = 102
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
ItemHeight = 13
TabOrder = 11
OnKeyDown = ComboBox3KeyDown
end
object DateTimePicker3: TDateTimePicker
Left = 340
Top = 116
Width = 102
Height = 21
Date = 38832.000000000000000000
Time = 38832.000000000000000000
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
TabOrder = 12
end
object ComboBox4: TComboBox
Left = 594
Top = 116
Width = 102
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
ItemHeight = 13
TabOrder = 13
OnKeyDown = ComboBox4KeyDown
end
object ComboBox5: TComboBox
Left = 120
Top = 145
Width = 102
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
ItemHeight = 13
TabOrder = 14
OnKeyDown = ComboBox5KeyDown
Items.Strings = (
#26381#21153#29366#24577
#29702#36180#29366#24577)
end
object ComboBox6: TComboBox
Left = 340
Top = 147
Width = 102
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
ItemHeight = 13
TabOrder = 15
OnKeyDown = ComboBox6KeyDown
end
object Button3: TButton
Left = 439
Top = 17
Width = 17
Height = 21
Caption = '...'
TabOrder = 16
OnClick = Button3Click
end
object Button5: TButton
Left = 695
Top = 16
Width = 17
Height = 21
Caption = '...'
TabOrder = 17
OnClick = Button5Click
end
object Button6: TButton
Left = 223
Top = 48
Width = 17
Height = 21
Caption = '...'
TabOrder = 18
OnClick = Button6Click
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 340
Width = 748
Height = 117
Align = alTop
Color = clInactiveCaptionText
DataSource = mydm.policysrc
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
ReadOnly = True
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'policy_Id'
Title.Caption = #20445#21333#32534#21495
Width = 65
Visible = True
end
item
Expanded = False
FieldName = 'Cust_ID'
Title.Caption = #23458#25143#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'Inst_ID'
Title.Caption = #34987#20445#20154#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'Bene_ID'
Title.Caption = #21463#30410#20154#32534#21495
Visible = True
end
item
Expanded = False
FieldName = 'Class_ID'
Title.Caption = #38505#31181#21517#31216
Visible = True
end
item
Expanded = False
FieldName = 'Policy_Mode'
Title.Caption = #32564#36153#26041#24335
Visible = True
end
item
Expanded = False
FieldName = 'Policy_Money'
Title.Caption = #25237#20445#24635#39069
Visible = True
end
item
Expanded = False
FieldName = 'Policy_Date'
Title.Caption = #25237#20445#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'Policy_Period'
Title.Caption = #20445#38505#26399#38388
Visible = True
end
item
Expanded = False
FieldName = 'Poli_valityDate'
Title.Caption = #29983#25928#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'poli_endDate'
Title.Caption = #21040#26399#26085
Visible = True
end
item
Expanded = False
FieldName = 'Poli_jiaoper'
Title.Caption = #32564#36153#26399#38388
Visible = True
end
item
Expanded = False
FieldName = 'Poli_status'
Title.Caption = #20445#21333#29366#24577
Visible = True
end
item
Expanded = False
FieldName = 'Poli_operater'
Title.Caption = #32463#21150#20154
Visible = True
end>
end
object Panel3: TPanel
Left = 0
Top = 460
Width = 748
Height = 89
Align = alClient
Color = clGradientInactiveCaption
TabOrder = 3
object Label9: TLabel
Left = 40
Top = 32
Width = 72
Height = 13
Caption = #25353#20445#21333#32534#21495#65306
end
object Label16: TLabel
Left = 387
Top = 32
Width = 72
Height = 13
Caption = #25353#38505#31181#21517#31216#65306
end
object Edit6: TEdit
Left = 118
Top = 27
Width = 112
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
TabOrder = 0
OnChange = Edit6Change
end
object Button1: TButton
Left = 252
Top = 26
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 1
OnClick = Button1Click
end
object Edit7: TEdit
Left = 469
Top = 27
Width = 112
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
TabOrder = 2
OnChange = Edit7Change
end
object Button2: TButton
Left = 607
Top = 26
Width = 75
Height = 25
Caption = #26597#35810
TabOrder = 3
OnClick = Button2Click
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -