📄 uwbg_mater_info.dfm
字号:
Top = 8
Width = 121
Height = 24
Date = 39044.636243206020000000
Time = 39044.636243206020000000
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnExit = dtp1Exit
end
object dtp2: TRzDateTimePicker
Left = 424
Top = 8
Width = 105
Height = 24
Date = 39044.636307418980000000
Time = 39044.636307418980000000
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnExit = dtp2Exit
end
end
object RzSizePanel1: TRzSizePanel
Left = 0
Top = 41
Width = 190
Height = 438
TabOrder = 1
UseGradients = True
object TreeView1: TTreeView
Left = 0
Top = 0
Width = 185
Height = 438
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
Indent = 19
ParentFont = False
TabOrder = 0
OnChange = TreeView1Change
end
end
object RzPageControl1: TRzPageControl
Left = 190
Top = 41
Width = 618
Height = 438
ActivePage = TabSheet1
Align = alClient
TabIndex = 0
TabOrder = 2
FixedDimension = 19
object TabSheet1: TRzTabSheet
Caption = #25253#20851#32479#35745
object DBGridEh1: TDBGridEh
Left = 0
Top = 0
Width = 614
Height = 415
Align = alClient
DataSource = DataSource1
Flat = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
FooterColor = clWindow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
FooterRowCount = 1
ParentFont = False
ReadOnly = True
SumList.Active = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBGridEh1CellClick
OnDblClick = DBGridEh1DblClick
OnTitleClick = DBGridEh1TitleClick
Columns = <
item
EditButtons = <>
FieldName = #20379#24212#21830#20195#30721
Footers = <
item
Value = #21512#35745#65306
ValueType = fvtStaticText
end>
Width = 70
end
item
EditButtons = <>
FieldName = #20379#24212#21830#21517#31216
Footers = <>
Width = 127
end
item
EditButtons = <>
FieldName = #25253#20851#29289#31867
Footers = <>
Width = 230
end
item
EditButtons = <>
FieldName = #37325#37327
Footers = <
item
FieldName = #37325#37327
ValueType = fvtSum
end>
Title.Caption = #37325#37327'('#21315#20811')'
Width = 71
end
item
EditButtons = <>
FieldName = #25968#37327
Footers = <>
Width = 73
end
item
EditButtons = <>
FieldName = #21333#20301
Footers = <>
Width = 39
end>
end
end
object TabSheet2: TRzTabSheet
Caption = #25253#20851#26126#32454
object DBGridEh2: TDBGridEh
Left = 0
Top = 0
Width = 614
Height = 415
Align = alClient
DataSource = DataSource2
Flat = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
FooterColor = clWindow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -11
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
FooterRowCount = 1
ParentFont = False
ReadOnly = True
SumList.Active = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnTitleClick = DBGridEh2TitleClick
Columns = <
item
EditButtons = <>
FieldName = #36865#36135#26085#26399
Footers = <
item
Value = #21512#35745#65306
ValueType = fvtStaticText
end>
Width = 84
end
item
EditButtons = <>
FieldName = #25910#36135#21333#21495
Footers = <>
Width = 121
end
item
EditButtons = <>
FieldName = #36865#36135#21333#21495
Footers = <>
Width = 109
end
item
EditButtons = <>
FieldName = #35746#21333#21495#30721
Footers = <>
Width = 95
end
item
EditButtons = <>
FieldName = #20379#24212#21830
Footers = <>
Width = 74
end
item
EditButtons = <>
FieldName = #25910#36135#20154
Footers = <>
Width = 61
end
item
EditButtons = <>
FieldName = #37325#37327
Footers = <
item
FieldName = #37325#37327
ValueType = fvtSum
end>
Width = 78
end
item
EditButtons = <>
FieldName = #21333#20301
Footers = <>
Width = 51
end
item
EditButtons = <>
FieldName = #22791#27880
Footers = <>
ShowImageAndText = True
end>
end
end
end
object ADOQuery1: TADOQuery
Parameters = <>
Left = 392
Top = 200
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 488
Top = 200
end
object ADOQuery2: TADOQuery
Parameters = <>
Left = 440
Top = 200
end
object ADOQuery3: TADOQuery
Parameters = <>
Left = 320
Top = 232
end
object DataSource2: TDataSource
DataSet = ADOQuery2
Left = 392
Top = 256
end
object ADOQuery4: TADOQuery
Parameters = <>
Left = 392
Top = 240
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -