📄 bustradeyearsumunit.~dfm
字号:
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFF}
ParentFont = False
TabOrder = 0
ViewStyle = vsReport
end
end
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 800
Height = 107
Align = alTop
BevelOuter = bvLowered
TabOrder = 1
object Panel3: TPanel
Left = 2
Top = 68
Width = 194
Height = 38
TabOrder = 0
object Label2: TLabel
Left = 178
Top = 12
Width = 12
Height = 13
Caption = #24180
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 8
Top = 12
Width = 103
Height = 13
AutoSize = False
Caption = #35831#36873#25321#27719#24635#26399#38388#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object ComboBox3: TComboBox
Left = 112
Top = 8
Width = 60
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = ComboBox3Change
Items.Strings = (
'2000'
'2001'
'2002'
'2003'
'2004'
'2005'
'2006'
'2007'
'2008'
'2009'
'2010')
end
end
object Panel6: TPanel
Left = 196
Top = 68
Width = 24
Height = 38
TabOrder = 1
object Label5: TLabel
Left = 6
Top = 12
Width = 12
Height = 13
Caption = #21040
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
end
object Panel4: TPanel
Left = 220
Top = 68
Width = 99
Height = 38
TabOrder = 2
object Label3: TLabel
Left = 78
Top = 13
Width = 12
Height = 13
Caption = #24180
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object ComboBox2: TComboBox
Left = 11
Top = 9
Width = 60
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = ComboBox2Change
Items.Strings = (
'2000'
'2001'
'2002'
'2003'
'2004'
'2005'
'2006'
'2007'
'2008'
'2009'
'2010')
end
end
object Panel2: TPanel
Left = 319
Top = 68
Width = 479
Height = 38
TabOrder = 3
object BitBtn1: TBitBtn
Left = 77
Top = 7
Width = 75
Height = 25
Caption = #27719' '#24635
TabOrder = 0
OnClick = BitBtn1Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333333333333333333FFFFFFFFFFF33330000000000
03333377777777777F33333003333330033333377FF333377F33333300333333
0333333377FF33337F3333333003333303333333377FF3337333333333003333
333333333377FF3333333333333003333333333333377FF33333333333330033
3333333333337733333333333330033333333333333773333333333333003333
33333333337733333F3333333003333303333333377333337F33333300333333
03333333773333337F33333003333330033333377FFFFFF77F33330000000000
0333337777777777733333333333333333333333333333333333}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 211
Top = 7
Width = 75
Height = 25
Caption = #25171' '#21360
TabOrder = 1
OnClick = BitBtn2Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 347
Top = 7
Width = 75
Height = 25
Caption = #36820' '#22238
TabOrder = 2
OnClick = BitBtn3Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333333333333333333333333333333333FF333333333333
3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
000033333373FF77777733333330003333333333333777333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
end
object Panel7: TPanel
Left = 1
Top = 1
Width = 798
Height = 34
Align = alTop
TabOrder = 4
object Label1: TLabel
Left = 254
Top = 5
Width = 228
Height = 23
AutoSize = False
Caption = #20844#20132#34892#19994#24180#25253#27719#24635
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -27
Font.Name = #38582#20070
Font.Style = []
ParentFont = False
end
end
object Panel8: TPanel
Left = 0
Top = 35
Width = 798
Height = 33
TabOrder = 5
object Label6: TLabel
Left = 7
Top = 9
Width = 59
Height = 13
AutoSize = False
Caption = #27719#24635#21333#20301#65306' '
end
object Label8: TLabel
Left = 214
Top = 9
Width = 104
Height = 13
AutoSize = False
Caption = #35831#36873#25321#27719#24635#25968#20540#65306
end
object ComboBox1: TComboBox
Left = 323
Top = 5
Width = 77
Height = 21
Style = csDropDownList
ItemHeight = 13
ItemIndex = 0
TabOrder = 0
Text = #20840#24180#23454#38469
OnChange = ComboBox1Change
Items.Strings = (
#20840#24180#23454#38469
#27979#31639#20540)
end
object Edit1: TEdit
Left = 69
Top = 6
Width = 121
Height = 21
TabOrder = 1
end
end
end
object ADOQuery1: TADOQuery
Connection = BusTradeDataModule.ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select '#25351#26631#20195#30721','#20840#24180#23454#38469' as '#26399#38388#27719#24635' from '#20844#20132#20225#19994#32479#35745#24180#25253#34920'_z order by '#25351#26631#20195#30721)
Left = 520
Top = 112
end
object ADOQuery3: TADOQuery
Connection = BusTradeDataModule.ADOConnection1
Parameters = <>
Left = 600
Top = 112
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -