📄 yearratio.dfm
字号:
ParentFont = False
TabOrder = 5
OnClick = btn_editClick
end
object btn_save: TButton
Left = 619
Top = 7
Width = 73
Height = 28
Caption = #20445#23384
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = btn_saveClick
end
object btn_cancel: TButton
Left = 470
Top = 7
Width = 75
Height = 28
Caption = #25918#24323
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = btn_cancelClick
end
object btn_delete: TButton
Left = 544
Top = 7
Width = 75
Height = 28
Caption = #21024#38500
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 8
OnClick = btn_deleteClick
end
end
end
object TabSheet2: TTabSheet
Caption = ' '#24180#32456#22870#37329#26435#37325#34920'_'#26597#30475' '
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ImageIndex = 1
ParentFont = False
OnEnter = TabSheet2Enter
object GroupBox3: TGroupBox
Left = 5
Top = 9
Width = 146
Height = 42
Caption = #25353#21150#20107#22788
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
object cbbsc: TComboBox
Left = 7
Top = 14
Width = 134
Height = 21
Color = clInfoBk
ItemHeight = 13
TabOrder = 0
end
end
object GroupBox4: TGroupBox
Left = 193
Top = 10
Width = 146
Height = 41
Caption = #25353#22995#21517
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
object cbxm: TComboBox
Left = 7
Top = 15
Width = 134
Height = 21
Color = clInfoBk
ItemHeight = 13
TabOrder = 0
end
end
object GroupBox5: TGroupBox
Left = 382
Top = 10
Width = 146
Height = 41
Caption = #25353#24037#21495
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
object cbgh: TComboBox
Left = 6
Top = 16
Width = 134
Height = 21
Color = clInfoBk
ItemHeight = 13
TabOrder = 0
end
end
object GroupBox6: TGroupBox
Left = 571
Top = 10
Width = 146
Height = 41
Caption = #25353#23703#20301
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
object cbgw: TComboBox
Left = 6
Top = 15
Width = 136
Height = 21
Color = clInfoBk
ItemHeight = 13
TabOrder = 0
end
end
object Panel2: TPanel
Left = -1
Top = 59
Width = 749
Height = 41
TabOrder = 4
object btn_brs: TButton
Left = 215
Top = 6
Width = 74
Height = 29
Caption = #20840#35272
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = btn_brsClick
end
object btn_qry: TButton
Left = 288
Top = 6
Width = 74
Height = 29
Caption = #26597#35810
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = btn_qryClick
end
object btn_clr: TButton
Left = 361
Top = 6
Width = 74
Height = 29
Caption = #28165#31354
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = btn_clrClick
end
object btn_prt: TButton
Left = 434
Top = 6
Width = 74
Height = 29
Caption = #25171#21360#32467#26524
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = btn_prtClick
end
end
object GroupBox2: TGroupBox
Left = 0
Top = 106
Width = 748
Height = 212
Align = alBottom
Caption = #25968#25454#26597#30475#31383#21475
TabOrder = 5
object DBGrid1: TDBGrid
Left = 8
Top = 16
Width = 732
Height = 186
Color = clInfoBk
DataSource = dsyearratio
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
ParentFont = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clBlack
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = #24037#21495
Visible = True
end
item
Expanded = False
FieldName = #22995#21517
Visible = True
end
item
Expanded = False
FieldName = #23703#20301
Visible = True
end
item
Expanded = False
FieldName = #21150#20107#22788#21517#31216
Visible = True
end
item
Expanded = False
FieldName = #24180
Visible = True
end
item
Expanded = False
FieldName = #24180#32456#22870#37329#26435
Visible = True
end
item
Expanded = False
FieldName = #32500#20462#20154#24037#36153#26435#37325
Visible = True
end
item
Expanded = False
FieldName = #20854#20182#22870#21169
Visible = True
end
item
Expanded = False
FieldName = #24212#25187
Visible = True
end
item
Expanded = False
FieldName = #20027#31649
Visible = True
end
item
Expanded = False
FieldName = #23457#26680
Visible = True
end
item
Expanded = False
FieldName = #24405#20837
Visible = True
end
item
Expanded = False
FieldName = #24405#20837#26085#26399
Visible = True
end>
end
end
end
end
object qyearratio: TQuery
CachedUpdates = True
AfterOpen = qyearratioAfterOpen
AutoRefresh = True
DatabaseName = 'zxjx_jxw'
RequestLive = True
SQL.Strings = (
'select a.'#24037#21495',a.'#24180#32456#22870#37329#26435',a.'#32500#20462#20154#24037#36153#26435#37325',a.'#20854#20182#22870#21169',a.'#24212#25187',a.'#24180',a.'#20027#31649',a.'#23457#26680',a.'#24405#20837',a.'#24405 +
#20837#26085#26399',b.'#22995#21517',b.'#23703#20301',b.'#21150#20107#22788#21517#31216
'from pub_z_yearratio a , pub_z_stuff b'
'where a.'#24037#21495'=b.'#24037#21495)
UpdateObject = UpdateSyratio
Left = 604
Top = 182
object qyearratioBDEDesigner: TStringField
FieldName = #24037#21495
Origin = 'ZXJX_JXW.pub_z_yearratio.'#24037#21495
FixedChar = True
end
object qyearratioBDEDesigner2: TFloatField
FieldName = #24180#32456#22870#37329#26435
Origin = 'ZXJX_JXW.pub_z_yearratio.'#24180#32456#22870#37329#26435
end
object qyearratioBDEDesigner3: TFloatField
FieldName = #32500#20462#20154#24037#36153#26435#37325
Origin = 'ZXJX_JXW.pub_z_yearratio.'#32500#20462#20154#24037#36153#26435#37325
EditFormat = '0.99999'
end
object qyearratioBDEDesigner4: TFloatField
FieldName = #20854#20182#22870#21169
Origin = 'ZXJX_JXW.pub_z_yearratio.'#20854#20182#22870#21169
EditFormat = '#.###'
end
object qyearratioBDEDesigner5: TFloatField
FieldName = #24212#25187
Origin = 'ZXJX_JXW.pub_z_yearratio.'#24212#25187
EditFormat = '#.###'
end
object qyearratioBDEDesigner6: TStringField
FieldName = #24180
Origin = 'ZXJX_JXW.pub_z_yearratio.'#24180
FixedChar = True
Size = 8
end
object qyearratioBDEDesigner7: TStringField
FieldName = #20027#31649
Origin = 'ZXJX_JXW.pub_z_yearratio.'#20027#31649
FixedChar = True
end
object qyearratioBDEDesigner8: TStringField
FieldName = #23457#26680
Origin = 'ZXJX_JXW.pub_z_yearratio.'#23457#26680
FixedChar = True
end
object qyearratioBDEDesigner9: TStringField
FieldName = #24405#20837
Origin = 'ZXJX_JXW.pub_z_yearratio.'#24405#20837
FixedChar = True
end
object qyearratioBDEDesigner10: TDateTimeField
FieldName = #24405#20837#26085#26399
Origin = 'ZXJX_JXW.pub_z_yearratio.'#24405#20837#26085#26399
end
object qyearratioBDEDesigner11: TStringField
FieldName = #22995#21517
Origin = 'ZXJX_JXW.pub_z_stuff.'#22995#21517
FixedChar = True
end
object qyearratioBDEDesigner12: TStringField
FieldName = #23703#20301
Origin = 'ZXJX_JXW.pub_z_stuff.'#23703#20301
FixedChar = True
end
object qyearratioBDEDesigner13: TStringField
FieldName = #21150#20107#22788#21517#31216
Origin = 'ZXJX_JXW.pub_z_stuff.'#21150#20107#22788#21517#31216
FixedChar = True
end
end
object dsyearratio: TDataSource
DataSet = qyearratio
Left = 558
Top = 157
end
object UpdateSyratio: TUpdateSQL
ModifySQL.Strings = (
'update pub_z_yearratio'
'set'
' '#24037#21495' = :'#24037#21495','
' '#24180#32456#22870#37329#26435' = :'#24180#32456#22870#37329#26435','
' '#32500#20462#20154#24037#36153#26435#37325' = :'#32500#20462#20154#24037#36153#26435#37325','
' '#20854#20182#22870#21169' = :'#20854#20182#22870#21169','
' '#24212#25187' = :'#24212#25187','
' '#24180' = :'#24180','
' '#20027#31649' = :'#20027#31649','
' '#23457#26680' = :'#23457#26680','
' '#24405#20837' = :'#24405#20837','
' '#24405#20837#26085#26399' = :'#24405#20837#26085#26399
'where'
' '#24037#21495' = :OLD_'#24037#21495' and'
' '#24180' = :OLD_'#24180)
InsertSQL.Strings = (
'insert into pub_z_yearratio'
' ('#24037#21495', '#24180#32456#22870#37329#26435', '#32500#20462#20154#24037#36153#26435#37325', '#20854#20182#22870#21169', '#24212#25187', '#24180', '#20027#31649', '#23457#26680', '#24405#20837', '
' '#24405#20837#26085#26399')'
'values'
' (:'#24037#21495', :'#24180#32456#22870#37329#26435', :'#32500#20462#20154#24037#36153#26435#37325', :'#20854#20182#22870#21169', :'#24212#25187', :'#24180', :'#20027#31649', :'#23457#26680', '
' :'#24405#20837', :'#24405#20837#26085#26399')')
DeleteSQL.Strings = (
'delete from pub_z_yearratio'
'where'
' '#24037#21495' = :OLD_'#24037#21495' and'
' '#24180' = :OLD_'#24180)
Left = 657
Top = 178
end
object Quse: TQuery
CachedUpdates = True
AutoRefresh = True
DatabaseName = 'zxjx_jxw'
Left = 518
end
object qforq: TQuery
CachedUpdates = True
AutoRefresh = True
DatabaseName = 'zxjx_jxw'
Left = 622
Top = 82
end
object dsforq: TDataSource
DataSet = qforq
Left = 586
Top = 82
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -