📄 bookfeequeryunit.dfm
字号:
object frmBookFeeQuery: TfrmBookFeeQuery
Left = 316
Top = 36
BorderStyle = bsSingle
Caption = #20070#36153#26597#35810
ClientHeight = 314
ClientWidth = 371
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
ShowHint = True
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 16
Top = 8
Width = 337
Height = 41
Caption = #20070#36153#26597#35810
TabOrder = 0
object RadioButton1: TRadioButton
Left = 56
Top = 14
Width = 113
Height = 17
Caption = #23398#29983#20070#36153#26597#35810
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 184
Top = 16
Width = 113
Height = 17
Caption = #38498#31995#20070#36153#26597#35810
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = RadioButton2Click
end
end
object GroupBox2: TGroupBox
Left = 16
Top = 48
Width = 337
Height = 49
Caption = #26597#35810#26465#20214
TabOrder = 1
object Label1: TLabel
Left = 10
Top = 24
Width = 98
Height = 14
Caption = #36873#25321#26597#35810#29677#32423#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
end
object ComboBox1: TComboBox
Left = 122
Top = 16
Width = 130
Height = 21
Style = csDropDownList
Enabled = False
ItemHeight = 13
TabOrder = 0
OnChange = ComboBox1Change
end
end
object BitBtn1: TBitBtn
Left = 312
Top = 60
Width = 30
Height = 25
TabOrder = 2
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F3333333F7F333301111111B10333337F333333737F33330111111111
0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
0333337F377777337F333301111111110333337F333333337F33330111111111
0333337FFFFFFFFF7F3333000000000003333377777777777333}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 282
Top = 60
Width = 30
Height = 25
Default = True
TabOrder = 3
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333FF3FF3333333333CC30003333333333773777333333333C33
3000333FF33337F33777339933333C3333333377F33337F3333F339933333C33
33003377333337F33377333333333C333300333F333337F33377339333333C33
3333337FF3333733333F33993333C33333003377FF33733333773339933C3333
330033377FF73F33337733339933C33333333FF377F373F3333F993399333C33
330077F377F337F33377993399333C33330077FF773337F33377399993333C33
33333777733337F333FF333333333C33300033333333373FF7773333333333CC
3000333333333377377733333333333333333333333333333333}
NumGlyphs = 2
end
object DBGrid2: TDBGrid
Left = 16
Top = 105
Width = 337
Height = 200
DataSource = DataSource1
TabOrder = 4
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Color = cl3DLight
Expanded = False
FieldName = 'DepartmentName'
Title.Alignment = taCenter
Title.Caption = #38498#31995#21517#31216
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'TotalFee'
Title.Alignment = taCenter
Title.Caption = #25152#21097#20070#36153
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'charger'
Title.Alignment = taCenter
Title.Caption = #36127#36131#20154
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'chargerPhone'
Title.Alignment = taCenter
Title.Caption = #36127#36131#20154#30005#35805
Width = 60
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'OperatorID'
Title.Alignment = taCenter
Title.Caption = #25805#20316#21592
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'lastTime'
Title.Alignment = taCenter
Title.Caption = #26368#36817#20351#29992#26085#26399
Width = 80
Visible = True
end>
end
object DBGrid1: TDBGrid
Left = 16
Top = 104
Width = 337
Height = 200
DataSource = DataSource1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
TabOrder = 5
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Color = cl3DLight
Expanded = False
FieldName = 'id'
Title.Alignment = taCenter
Title.Caption = #32534#21495
Width = 40
Visible = True
end
item
Expanded = False
FieldName = 'className'
Title.Alignment = taCenter
Title.Caption = #29677#32423#21517
Width = 70
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'strength'
Title.Alignment = taCenter
Title.Caption = #20154#25968
Width = 40
Visible = True
end
item
Expanded = False
FieldName = 'lastFee'
Title.Alignment = taCenter
Title.Caption = #19978#26399#20070#36153
Width = 50
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'theFee'
Title.Alignment = taCenter
Title.Caption = #26412#27425#20132#36153
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'nowFee'
Title.Alignment = taCenter
Title.Caption = #24403#21069#20070#36153
Width = 50
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'handler'
Title.Alignment = taCenter
Title.Caption = #32463#21150#20154
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'About'
Title.Alignment = taCenter
Title.Caption = #22791#27880
Width = 50
Visible = True
end
item
Color = cl3DLight
Expanded = False
FieldName = 'OperatorID'
Title.Alignment = taCenter
Title.Caption = #25805#20316#21592
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'lastTime'
Title.Alignment = taCenter
Title.Caption = #26368#36817#20351#29992#26085#26399
Width = 80
Visible = True
end>
end
object DataSource1: TDataSource
Left = 149
Top = 178
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -