📄 main.dfm
字号:
object MainForm: TMainForm
Left = 216
Top = 101
Width = 440
Height = 243
Caption = 'RX Library Demo Program'
Color = clAppWorkSpace
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIForm
Icon.Data = {
0000010001002020100000000000E80200001600000028000000200000004000
0000010004000000000080020000000000000000000000000000000000000000
0000000080000080000000808000800000008000800080800000C0C0C0008080
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
0000000000000000000000000000000000000000000000000000000000000000
0000000099999000099999990000000000000000099900000009990000000000
0000000000999CC000099CCCCC000000000000000009990000099CCC00000000
000000000000999000990CC000000000000000000000099900990CC000000000
00000000000000999099CC000000000000000000000000099999CC0000009999
90000000999900009990CC000000999000000009990000000999CC000000099C
CCC0000990CCCC00099990000000099CC00000099CCC0000990999000000099C
C00000990CC00000990C999000000099C00000990CC0000099CC099900000099
C0000099CC00000099CC009990000099CC000990CC00000990CC000999000099
CC000990CC00000990CC00009999000999999999C00000999CC0000009990009
9C0000999900999999900009999900099CCCCCCC99900000CCC00000000C0009
9CC00000999900CCCCCCC0000CCC000099C000000999C0000000000000000000
99C000000099CC00000000000000000099CC00000099CC000000000000000000
99CC00000999CC000000000000000000999C00009990CC000000000000000099
99999999900CCC00000000000000000000CCC00000CCC0000000000000000000
CCCCCCCCCCC0000000000000000000000000000000000000000000000000FFFF
FFFFFFFFFFFFFFF0780FFFF8FE3FFFFC1E03FFFE3E0FFFFF1C9FFFFF8C9FFFFF
C43FFFFFE03F07F0F13F1FE3F83F81E4387F87E0F23F87C9F21FC7C9F08FC7C3
F0C7C393E4E3C393E4F0E007C1F8E3C301E0E001F1FEE1F0C078F1F87FFFF1FC
3FFFF0FC3FFFF0F83FFFF0F13FFFC0063FFFFC7C7FFFF001FFFFFFFFFFFF}
Menu = MainMenu1
PixelsPerInch = 96
Position = poDefault
WindowMenu = WindowMenu
OnCreate = FormCreate
OnDestroy = FormDestroy
TextHeight = 13
object StatusPanel: TPanel
Left = 0
Top = 177
Width = 432
Height = 20
Align = alBottom
Caption = 'StatusPanel'
TabOrder = 0
object MessagePanel: TPanel
Left = 1
Top = 1
Width = 260
Height = 18
Align = alClient
Alignment = taLeftJustify
BevelOuter = bvNone
ParentColor = True
TabOrder = 0
end
object Panel1: TPanel
Left = 261
Top = 1
Width = 6
Height = 18
Align = alRight
BevelOuter = bvNone
ParentColor = True
TabOrder = 1
end
object ProgressPanel: TPanel
Left = 267
Top = 1
Width = 164
Height = 18
Align = alRight
BevelInner = bvLowered
BevelOuter = bvNone
BorderWidth = 1
Caption = 'ProgressPanel'
ParentColor = True
TabOrder = 2
object DbiProgress: TGauge
Left = 2
Top = 2
Width = 160
Height = 14
Align = alClient
ShowText = False
BorderStyle = bsNone
ForeColor = clNavy
BackColor = clBtnFace
Progress = 0
end
end
end
object Toolbar: TSpeedBar
Left = 0
Top = 0
Width = 432
Height = 56
Font.Color = clBtnText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [sbAllowDrag, sbAllowResize, sbFlatBtns, sbGrayedBtns, sbTransparentBtns]
BtnOffsetHorz = 8
BtnOffsetVert = 3
BtnWidth = 54
BtnHeight = 50
IniStorage = FormPlacement1
Version = 3
BevelInner = bvLowered
BevelOuter = bvNone
TabOrder = 1
InternalVer = 1
object SpeedbarSection1: TSpeedbarSection
Caption = 'File'
end
object SpeedbarSection2: TSpeedbarSection
Caption = 'View'
end
object SpeedbarSection3: TSpeedbarSection
Caption = 'Window'
end
object SpeedbarSection4: TSpeedbarSection
Caption = 'Help'
end
object CustomizeBtn: TSpeedItem
BtnCaption = 'Setup'
Caption = 'Customize Speedbar'
DropDownMenu = ToolbarMenu
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DF7777777777777777770000DF87
77787777877778870000DF8FAA78F9978FCC78870000DF8FAA78F9978FCC7887
0000DF8FFF78FFF78FFF78870000DF8888888888888888870000DFFFFFFFFFFF
FFFFFFF70000DDDDDDDDDDDDDDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDD
DDDDDDDDDDDDDDDD0000DDDDDDDDDDDDD70007DD0000DDDDDDDDDDDD70EEE0DD
0000DDD7000000000EE007DD0000DDD0E4EEEEEEEEE0DDDD0000DDD700000000
0EE007DD0000DDDDDDDDDDDD70EEE0DD0000DDDDDDDDDDDDD70007DD0000DDDD
DDDDDDDDDDDDDDDD0000}
Hint = 'Customize Speedbar|'
Spacing = 3
Left = 233
Top = 3
Visible = True
OnClick = CustomizeItemClick
SectionName = 'File'
end
object ExitBtn: TSpeedItem
BtnCaption = 'Exit'
Caption = 'Exit Application'
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDD0000777777777777777DDDD7000077777777777777FDFD7700007777
777777777F3F37770000444444077777FFF4444D0000DDDDD450777F3FF4DDDD
0000DDDDD45507FFFFF4DDDD0000DDDDD45550FFFFF4DDDD0000DDD0045550FF
FFF4DDDD0000DDD0A05550FFFFF4DDDD00000000EA0550FFFEF4DDDD00000EAE
AEA050FFFFF4DDDD00000AEAEAEA00FEFEF4DDDD00000EAEAEA050FFFFF4DDDD
00000000EA0550FEFEF4DDDD0000DDD0A05550EFEFE4DDDD0000DDD0045550FE
FEF4DDDD0000DDDDD45550EFEFE4DDDD0000DDDDD44444444444DDDD0000DDDD
DDDDDDDDDDDDDDDD0000}
Hint = 'Exit Application|'
Spacing = 3
Left = 350
Top = 3
Visible = True
OnClick = Exit
SectionName = 'File'
end
object View1Btn: TSpeedItem
Tag = 1
AllowAllUp = True
BtnCaption = 'Controls'
Caption = 'View Controls'
GroupIndex = 1
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888800008888880000088888888800008888880CCC088888888800008888
880CCC077888888800008888880CCC0880000008000088888800000880999908
0000888888887888880990880000888888887888880990880000888888888404
8881188800008888888842B2488008880000800000000BBB07788888000080FF
FFFF42B248888888000080FFFFFFF40488888888000080FFFFFFFFF088888888
000080FFFFFFFFF088888888000080FFFFFFFFF088888888000080FFFFFFFFF0
88888888000080CCCCCCCCC08888888800008000000000008888888800008888
88888888888888880000}
Hint = 'View Controls|'
Spacing = 3
Left = 8
Top = 3
Visible = True
OnClick = View
SectionName = 'View'
end
object View2Btn: TSpeedItem
Tag = 2
AllowAllUp = True
BtnCaption = 'DB'
Caption = 'View Data Controls'
GroupIndex = 1
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888800008888880000088888888800008888880CCC088888888800008888
880CCC077888888800008888880CCC0880000008000088888800000880999908
0000888888887888880990880000888888887888880990880000880000008404
000118880000880FFFF742B24FF008880000880F77F70BBB077F08880000880F
FFF742B24FFF08880000880F77F7F40477FF08880000880FFFF7FFFFFFFF0888
0000880F77F7F777777F08880000880FFFF7FFFFFFFF08880000880000000000
0000088800008808888888888888088800008800000000000000088800008888
88888888888888880000}
Hint = 'View Data Controls|'
Spacing = 3
Left = 62
Top = 3
Visible = True
OnClick = View
SectionName = 'View'
end
object View3Btn: TSpeedItem
Tag = 3
AllowAllUp = True
BtnCaption = 'Tools'
Caption = 'View Tools'
GroupIndex = 1
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888800008880000088888888888800008880CCC088888888888800008880
CCC077888888888800008880CCC0880000008888000088800000880999908888
0000888887888880990888880000888887888880990888880000888888404888
1188888800008888842B2488008888880000888880BBB0778888888800008888
842B24888888888800008888884048887000788800008888888888870EEE0888
0000887000000000EE0078880000880E4EEEEEEEEE0888880000887000000000
EE00788800008888888888870EEE088800008888888888887000788800008888
88888888888888880000}
Hint = 'View Tools|'
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -