📄 ckglfrm_.dfm
字号:
#39318#26465#35760#24405
#19978#19968#35760#24405
#19979#19968#35760#24405
#26411#26465#35760#24405
#25554#20837#35760#24405
#21024#38500#35760#24405
#20462#25913#35760#24405
#20445#23384#20462#25913
#21462#28040#20462#25913
#21047#26032#35760#24405)
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
end
object mmoJc: TDBMemo
Left = 0
Top = 280
Width = 633
Height = 89
Align = alBottom
DataField = 'mem'
DataSource = dsJc
TabOrder = 3
end
end
object shtGh: TTabSheet
Tag = 13
Caption = #24402#36824#31649#29702
ImageIndex = 4
object grdGh: TDBGridEh
Left = 0
Top = 41
Width = 633
Height = 239
Align = alClient
DataSource = dsGh
Flat = True
FooterColor = clWindow
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
EditButtons = <>
FieldName = 'bh'
Footers = <>
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #32534#21495
Visible = False
end
item
EditButtons = <>
FieldName = 'hplb'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #36135#21697#31867#21035
Width = 80
end
item
EditButtons = <>
FieldName = 'cd'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #21697#29260'/'#20135#22320
Width = 100
end
item
EditButtons = <>
FieldName = 'gg'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #35268#26684
Width = 60
end
item
EditButtons = <>
FieldName = 'hhr'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #24402#36824#20154
Width = 60
end
item
EditButtons = <>
FieldName = 'ghck'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #24402#36824#20179#24211
Width = 60
end
item
EditButtons = <>
Footers = <>
Visible = False
end
item
EditButtons = <>
FieldName = 'jldw'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #35745#37327#21333#20301
Width = 60
end
item
EditButtons = <>
FieldName = 'ghsl'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #24402#36824#25968#37327
end
item
EditButtons = <>
FieldName = 'whsl'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #26410#36824#25968#37327
end
item
EditButtons = <>
FieldName = 'czy'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #25805#20316#21592
end>
end
object pnlGhTop: TPanel
Left = 0
Top = 0
Width = 633
Height = 41
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object lblGhPzh: TLabel
Left = 264
Top = 8
Width = 48
Height = 16
Caption = #20973#35777#21495
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsItalic]
ParentFont = False
Transparent = True
end
object lblRhrq: TLabel
Left = 24
Top = 8
Width = 72
Height = 16
Caption = #24402#36824#26085#26399' '
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsItalic]
ParentFont = False
Transparent = True
end
object dtpGhrq: TDateTimePicker
Left = 112
Top = 6
Width = 97
Height = 20
CalAlignment = dtaLeft
Date = 37505.740418287
Time = 37505.740418287
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 0
end
end
object pnlGhBottom: TPanel
Left = 0
Top = 369
Width = 633
Height = 25
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
object dbngGh: TDBNavigator
Left = 0
Top = 0
Width = 633
Height = 25
DataSource = dsGh
Align = alClient
Flat = True
Hints.Strings = (
#39318#26465#35760#24405
#19978#19968#35760#24405
#19979#19968#35760#24405
#26411#26465#35760#24405
#25554#20837#35760#24405
#21024#38500#35760#24405
#20462#25913#35760#24405
#20445#23384#20462#25913
#21462#28040#20462#25913
#21047#26032#35760#24405)
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
end
object mmoGh: TDBMemo
Left = 0
Top = 280
Width = 633
Height = 89
Align = alBottom
DataField = 'mem'
DataSource = dsGh
TabOrder = 3
end
end
object shtPd: TTabSheet
Tag = 11
Caption = #30424#28857#31649#29702
ImageIndex = 5
object grdPd: TDBGridEh
Left = 0
Top = 41
Width = 633
Height = 264
Align = alClient
DataSource = dsPd
Flat = True
FooterColor = clWindow
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
EditButtons = <>
FieldName = 'bh'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #32534#21495
Visible = False
end
item
EditButtons = <>
FieldName = 'hplb'
Footers = <>
PickList.Strings = (
'11'
'22')
Title.Alignment = taCenter
Title.Caption = #36135#21697#31867#21035
Width = 60
end
item
EditButtons = <>
FieldName = 'cd'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #21697#29260'/'#20135#22320
Width = 149
end
item
EditButtons = <>
FieldName = 'gg'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #35268#26684
Width = 60
end
item
EditButtons = <>
FieldName = 'pdck'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #30424#28857#20179#24211
Width = 60
end
item
EditButtons = <>
FieldName = 'jldw'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #35745#37327#21333#20301
Width = 60
end
item
EditButtons = <>
FieldName = 'pky'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #30424#20111'/'#36194
Width = 80
end
item
EditButtons = <>
FieldName = 'czy'
Footers = <>
Title.Alignment = taCenter
Title.Caption = #25805#20316#21592
Width = 83
end>
end
object pnlPdTop: TPanel
Left = 0
Top = 0
Width = 633
Height = 41
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object lblPdrq: TLabel
Left = 24
Top = 8
Width = 72
Height = 16
Caption = #30424#28857#26085#26399' '
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsItalic]
ParentFont = False
Transparent = True
end
object Label1: TLabel
Left = 224
Top = 11
Width = 12
Height = 12
Caption = #33267
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
Transparent = True
end
object dtpBeginDate: TDateTimePicker
Left = 112
Top = 6
Width = 97
Height = 20
CalAlignment = dtaLeft
Date = 37505.740418287
Time = 37505.740418287
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 0
end
object btnPd: TButton
Left = 368
Top = 6
Width = 89
Height = 21
Caption = #24320#22987#30424#28857'(&S)'
TabOrder = 1
OnClick = btnPdClick
end
object dtpEndDate: TDateTimePicker
Left = 256
Top = 6
Width = 97
Height = 20
CalAlignment = dtaLeft
Date = 37505.740418287
Time = 37505.740418287
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 2
end
object Button1: TButton
Left = 466
Top = 6
Width = 103
Height = 21
Caption = #28165#31354#30424#28857#34920'(&C)'
TabOrder = 3
OnClick = Button1Click
end
end
object mmoPd: TDBMemo
Left = 0
Top = 305
Width = 633
Height = 89
Align = alBottom
DataField = 'mem'
DataSource = dsPd
TabOrder = 2
end
end
end
object tblRk: TADOTable
CacheSize = 1500
AfterInsert = tblRkAfterInsert
AfterEdit = tblRkAfterEdit
BeforePost = tblRkBeforePost
AfterPost = tblRkAfterPost
AfterDelete = tblRkAfterDelete
TableName = 'rk'
Left = 12
Top = 111
end
object dsRk: TDataSource
DataSet = tblRk
Left = 44
Top = 111
end
object tblCk: TADOTable
CacheSize = 1500
AfterInsert = tblRkAfterInsert
AfterEdit = tblRkAfterEdit
BeforePost = tblRkBeforePost
AfterPost = tblRkAfterPost
AfterDelete = tblRkAfterDelete
TableName = 'ck'
Left = 76
Top = 111
end
object dsCk: TDataSource
DataSet = tblCk
Left = 100
Top = 111
end
object tblTk: TADOTable
CacheSize = 1500
AfterInsert = tblRkAfterInsert
AfterEdit = tblRkAfterEdit
BeforePost = tblRkBeforePost
AfterPost = tblRkAfterPost
AfterDelete = tblRkAfterDelete
TableName = 'tk'
Left = 132
Top = 111
end
object dsTk: TDataSource
DataSet = tblTk
Left = 156
Top = 111
end
object tblJc: TADOTable
CacheSize = 1500
AfterInsert = tblRkAfterInsert
AfterEdit = tblRkAfterEdit
BeforePost = tblRkBeforePost
AfterPost = tblRkAfterPost
AfterDelete = tblRkAfterDelete
TableName = 'jc'
Left = 372
Top = 111
end
object dsJc: TDataSource
DataSet = tblJc
Left = 404
Top = 111
end
object tblPd: TADOTable
CacheSize = 1500
TableName = 'pd'
Left = 308
Top = 111
end
object dsPd: TDataSource
DataSet = tblPd
Left = 340
Top = 111
end
object tblDk: TADOTable
CacheSize = 1500
AfterInsert = tblRkAfterInsert
AfterEdit = tblRkAfterEdit
BeforePost = tblRkBeforePost
AfterPost = tblRkAfterPost
AfterDelete = tblRkAfterDelete
TableName = 'dk'
Left = 188
Top = 111
end
object dsDk: TDataSource
DataSet = tblDk
Left = 212
Top = 111
end
object tblGh: TADOTable
CacheSize = 1500
AfterInsert = tblRkAfterInsert
AfterEdit = tblRkAfterEdit
BeforePost = tblRkBeforePost
AfterPost = tblRkAfterPost
AfterDelete = tblRkAfterDelete
TableName = 'gh'
Left = 244
Top = 111
end
object dsGh: TDataSource
DataSet = tblGh
Left = 276
Top = 111
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -