📄 q_wjs.dfm
字号:
Title.Caption = #36710#29260#21495
Width = 86
Visible = True
end
item
Expanded = False
FieldName = 'dj_cz'
Title.Alignment = taCenter
Title.Caption = #36710#20027
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'dj_czdw'
Title.Alignment = taCenter
Title.Caption = #36710#20027#21333#20301
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'dj_tel'
Title.Alignment = taCenter
Title.Caption = #32852#31995#30005#35805
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'dj_addr'
Title.Alignment = taCenter
Title.Caption = #32852#31995#22320#22336
Width = 120
Visible = True
end
item
Expanded = False
FieldName = 'dj_bx_kind'
Title.Alignment = taCenter
Title.Caption = #20445#38505#31867#22411
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'dj_wx_kind'
Title.Alignment = taCenter
Title.Caption = #32500#20462#31867#22411
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'dj_yj_zf'
Title.Alignment = taCenter
Title.Caption = #30446#21069#25276#37329
Width = 74
Visible = True
end>
end
end
object Panel4: TPanel
Left = 182
Top = 162
Width = 571
Height = 262
BevelInner = bvLowered
Color = clActiveBorder
TabOrder = 2
object DBGrid2: TDBGrid
Left = 4
Top = 88
Width = 563
Height = 83
DataSource = ds_pj_add
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'pj_kind'
Title.Alignment = taCenter
Title.Caption = #37197#20214#31867#22411
Width = 120
Visible = True
end
item
Expanded = False
FieldName = 'pj_gg'
Title.Alignment = taCenter
Title.Caption = #37197#20214#35268#26684
Width = 120
Visible = True
end
item
Expanded = False
FieldName = 'pj_name'
Title.Alignment = taCenter
Title.Caption = #37197#20214#21517#31216
Width = 120
Visible = True
end
item
Expanded = False
FieldName = 'pj_sy_sum'
Title.Alignment = taCenter
Title.Caption = #39044#20351#29992#25968#37327
Visible = True
end
item
Expanded = False
FieldName = 'pj_ck_sum'
Title.Alignment = taCenter
Title.Caption = #24050#20986#24211#25968#37327
Visible = True
end
item
Expanded = False
FieldName = 'pj_xz_sum'
Title.Alignment = taCenter
Title.Caption = #26032#36861#21152#25968#37327
Visible = True
end
item
Expanded = False
FieldName = 'pj_fk_sum'
Title.Alignment = taCenter
Title.Caption = #39044#36820#24211#25968#37327
Visible = True
end
item
Expanded = False
FieldName = 'pj_unit'
Title.Alignment = taCenter
Title.Caption = #21333#20301
Visible = True
end
item
Expanded = False
FieldName = 'pj_dj'
Title.Alignment = taCenter
Title.Caption = #21333#20215
Visible = True
end>
end
object DBGrid3: TDBGrid
Left = 4
Top = 4
Width = 563
Height = 83
DataSource = ds_gs_add
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'gs_text'
Title.Alignment = taCenter
Title.Caption = #24037#26102#20869#23481
Width = 140
Visible = True
end
item
Expanded = False
FieldName = 'gs_sum'
Title.Alignment = taCenter
Title.Caption = #24037#26102#25968
Visible = True
end
item
Expanded = False
FieldName = 'gs_dj'
Title.Alignment = taCenter
Title.Caption = #21333#20215
Visible = True
end
item
Expanded = False
FieldName = 'gs_zj'
Title.Alignment = taCenter
Title.Caption = #24635#20215
Visible = True
end
item
Expanded = False
FieldName = 'gs_pg_id'
Title.Alignment = taCenter
Title.Caption = #27966#24037#20154#21592#32534#21495
Width = 90
Visible = True
end
item
Expanded = False
FieldName = 'gs_pg'
Title.Alignment = taCenter
Title.Caption = #27966#24037#20154#21592#22995#21517
Width = 90
Visible = True
end>
end
object DBGrid4: TDBGrid
Left = 4
Top = 172
Width = 563
Height = 83
DataSource = ds_other
Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 2
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'o_name'
Title.Alignment = taCenter
Title.Caption = #39033#30446#21517#31216
Width = 244
Visible = True
end
item
Expanded = False
FieldName = 'o_je'
Title.Alignment = taCenter
Title.Caption = #37329#39069
Width = 85
Visible = True
end>
end
end
object Panel2: TPanel
Left = 183
Top = 139
Width = 570
Height = 23
Caption = #32500#20462#39033#30446#28165#21333
Color = clHighlight
Font.Charset = GB2312_CHARSET
Font.Color = clYellow
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object qe_cl: TQuery
AfterScroll = qe_clAfterScroll
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from cl_dj')
Left = 302
Top = 38
end
object ds_cl: TDataSource
DataSet = qe_cl
Left = 270
Top = 38
end
object qe_pj_add: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from pj_add where dj_bh = :ibh')
Left = 270
Top = 280
ParamData = <
item
DataType = ftString
Name = 'ibh'
ParamType = ptUnknown
end>
end
object ds_pj_add: TDataSource
DataSet = qe_pj_add
Left = 318
Top = 280
end
object qe_gs_add: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from gs_ad where dj_bh = :ibh')
Left = 262
Top = 208
ParamData = <
item
DataType = ftString
Name = 'ibh'
ParamType = ptUnknown
end>
end
object ds_gs_add: TDataSource
DataSet = qe_gs_add
Left = 310
Top = 216
end
object qe_bx: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from bx_kind')
Left = 17
Top = 352
end
object qe_other: TQuery
DatabaseName = 'dn_qp3'
SessionName = 'se_qp3_1'
SQL.Strings = (
'select * from other_add where dj_bh = :ibh')
Left = 254
Top = 354
ParamData = <
item
DataType = ftString
Name = 'ibh'
ParamType = ptUnknown
end>
end
object ds_other: TDataSource
DataSet = qe_other
Left = 294
Top = 354
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -