📄 fcase.dfm
字号:
FF00FF00FF0000000000D06F0F00E08F0F00DF800F00DF800F00DF700F000000
0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF0000000000D06F0F00E08F0F00E08F0F00E08F0F00D06F0F0000000000FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF0000000000D06F0F00E08F0F00D06F0F0000000000FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000D06F0F0000000000FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
EditButton.Style = ebsGlyphEh
EditButton.Visible = False
EditButtons = <>
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
Kind = dtkDateEh
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 12
Visible = True
OnEnter = EBillDateEnter
OnExit = EBillDateExit
OnKeyPress = EBillNoKeyPress
end
object EPeopleB: TDBEditEh
Left = 388
Top = 103
Width = 179
Height = 19
Alignment = taLeftJustify
BorderStyle = bsNone
Ctl3D = False
DataField = #34987#30003#35831#20154
DataSource = _BillHead
EditButtons = <>
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ParentColor = True
ParentCtl3D = False
TabOrder = 3
Visible = True
OnEnter = EPeopleBEnter
OnKeyPress = EBillNoKeyPress
end
object EAmountD: TDBNumberEditEh
Left = 392
Top = 200
Width = 155
Height = 19
Hint = #24517#39035#36755#20837#35201#27714#26085#26399#12289#38144#21806#20195#34920#12289#24320#21457#24037#31243#24072
BorderStyle = bsNone
currency = True
DataField = #21453#35831#27714#21463#29702#36153
DataSource = _BillHead
DisplayFormat = '#,###.00'
EditButtons = <>
ParentColor = True
TabOrder = 7
Visible = True
OnChange = EAmountCChange
OnKeyPress = EBillNoKeyPress
end
object EPeopleA: TDBEditEh
Left = 98
Top = 103
Width = 183
Height = 19
Hint = #24517#39035#36755#20837#39033#30446#26469#28304#12289#23458#25143#12289#35201#27714#26085#26399#12289#38144#21806#20195#34920#12289#24320#21457#24037#31243#24072
Alignment = taLeftJustify
BorderStyle = bsNone
Ctl3D = False
DataField = #30003#35831#20154
DataSource = _BillHead
EditButtons = <>
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ParentColor = True
ParentCtl3D = False
TabOrder = 2
Visible = True
OnEnter = EPeopleAEnter
OnKeyPress = EBillNoKeyPress
end
object EAmountA: TDBNumberEditEh
Left = 98
Top = 151
Width = 163
Height = 19
Hint = #24517#39035#36755#20837#35201#27714#26085#26399#12289#38144#21806#20195#34920#12289#24320#21457#24037#31243#24072
BorderStyle = bsNone
currency = True
DataField = #26631#30340
DataSource = _BillHead
DisplayFormat = '#,###.00'
EditButtons = <>
ParentColor = True
TabOrder = 4
Visible = True
OnKeyPress = EBillNoKeyPress
end
object EAmountC: TDBNumberEditEh
Left = 98
Top = 200
Width = 163
Height = 19
Hint = #24517#39035#36755#20837#35201#27714#26085#26399#12289#38144#21806#20195#34920#12289#24320#21457#24037#31243#24072
BorderStyle = bsNone
currency = True
DataField = #20210#35009#21463#29702#36153
DataSource = _BillHead
DisplayFormat = '#,###.00'
EditButtons = <>
ParentColor = True
TabOrder = 6
Visible = True
OnChange = EAmountCChange
OnKeyPress = EBillNoKeyPress
end
object EAmountB: TDBNumberEditEh
Left = 392
Top = 151
Width = 155
Height = 19
Hint = #24517#39035#36755#20837#35201#27714#26085#26399#12289#38144#21806#20195#34920#12289#24320#21457#24037#31243#24072
BorderStyle = bsNone
currency = True
DataField = #21453#35831#27714#26631#30340
DataSource = _BillHead
DisplayFormat = '#,###.00'
EditButtons = <>
ParentColor = True
TabOrder = 5
Visible = True
OnKeyPress = EBillNoKeyPress
end
object EJudgeA: TDBLookupComboboxEh
Left = 99
Top = 247
Width = 102
Height = 20
BorderStyle = bsNone
Ctl3D = False
DataField = #39318#24109#20210#35009#21592
DataSource = _BillHead
DropDownBox.Columns = <
item
Color = clWhite
FieldName = #20195#30721
Title.Caption = #21517#31216
Width = 40
end
item
Color = clWhite
FieldName = #22995#21517
Width = 60
end>
DropDownBox.Options = [dlgColumnResizeEh]
DropDownBox.AutoDrop = True
DropDownBox.Rows = 10
DropDownBox.Sizable = True
DropDownBox.Width = 100
EditButton.Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000000000000000000000000000000000000FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000DF700F0000000000FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF0000000000DF700F00D06F0F00DF7F0F0000000000FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF0000000000DF700F00D06F0F00D06F0F00D06F0F00DF800F0000000000FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF0000000000DF700F00D06F0F00DF6F0F00DF6F0F00E08F0F000000
0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF700F00DF6F0F00E08F
0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF700F00D06F
0F00DF800F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF70
0F00D06F0F00DF7F0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF0000000000DF700F00DF7F0F00DF7F0F00DF70
0F00DF7F0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000DF6F0F00DF800F00DF800F00DF7F0F00DF70
0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF0000000000D06F0F00E08F0F00DF800F00DF800F00DF700F000000
0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF0000000000D06F0F00E08F0F00E08F0F00E08F0F00D06F0F0000000000FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF0000000000D06F0F00E08F0F00D06F0F0000000000FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000D06F0F0000000000FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
EditButton.Style = ebsEllipsisEh
EditButton.Visible = False
EditButtons = <>
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
KeyField = #22995#21517
ListField = #22995#21517
ListSource = _Judge
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 8
Visible = True
OnEnter = EJudgeAEnter
OnExit = EJudgeAExit
OnKeyPress = EBillNoKeyPress
end
object EJudgeB: TDBLookupComboboxEh
Left = 281
Top = 247
Width = 102
Height = 20
BorderStyle = bsNone
Ctl3D = False
DataField = #20210#35009#21592#19968
DataSource = _BillHead
DropDownBox.Columns = <
item
Color = clWhite
FieldName = #20195#30721
Title.Caption = #21517#31216
Width = 40
end
item
Color = clWhite
FieldName = #22995#21517
Width = 60
end>
DropDownBox.Options = [dlgColumnResizeEh]
DropDownBox.Align = daCenter
DropDownBox.AutoDrop = True
DropDownBox.Rows = 10
DropDownBox.Sizable = True
DropDownBox.Width = 100
EditButton.Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000000000000000000000000000000000000FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000DF700F0000000000FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF0000000000DF700F00D06F0F00DF7F0F0000000000FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF0000000000DF700F00D06F0F00D06F0F00D06F0F00DF800F0000000000FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF0000000000DF700F00D06F0F00DF6F0F00DF6F0F00E08F0F000000
0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF700F00DF6F0F00E08F
0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF700F00D06F
0F00DF800F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000DF7F0F00DF700F00DF70
0F00D06F0F00DF7F0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF0000000000DF700F00DF7F0F00DF7F0F00DF70
0F00DF7F0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000DF6F0F00DF800F00DF800F00DF7F0F00DF70
0F0000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF0000000000D06F0F00E08F0F00DF800F00DF800F00DF700F000000
0000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF0000000000D06F0F00E08F0F00E08F0F00E08F0F00D06F0F0000000000FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF0000000000D06F0F00E08F0F00D06F0F0000000000FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF0000000000D06F0F0000000000FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF0000000000FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
EditButton.Style = ebsEllipsisEh
EditButton.Visible = False
EditButtons = <>
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
KeyField = #22995#21517
ListField = #22995#21517
ListSource = _Judge
ParentColor = True
ParentCtl3D = False
ParentFont = False
TabOrder = 9
Visible = True
OnEnter = EJudgeAEnter
OnExit = EJudgeAExit
OnKeyPress = EBillNoKeyPress
end
object ECaled: TDBCheckBox
Left = 22
Top = 21
Width = 171
Height = 17
Caption = #26159#21542#24050#25903#20184#25253#37228
DataField = #26159#21542#24050#25903#20184
DataSource = _BillHead
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 13
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object ESecretory: TDBLookupComboboxEh
Left = 99
Top = 296
Width = 102
Height = 20
BorderStyle = bsNone
Ctl3D = False
DataField = #31192#20070
DataSource = _BillHead
DropDownBox.Columns = <
item
Color = clWhite
FieldName = #20195#30721
Title.Caption = #21517#31216
Width = 50
end
item
Color = clWhite
FieldName = #22995#21517
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -