📄 unit1.~dfm
字号:
object Form1: TForm1
Left = 261
Top = 62
AutoSize = True
BorderStyle = bsSingle
Caption = #31616#21333#20116#23376#26827
ClientHeight = 460
ClientWidth = 450
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 45
Width = 450
Height = 415
Align = alClient
Color = clBackground
Ctl3D = False
ParentCtl3D = False
TabOrder = 0
object Label1: TLabel
Left = 56
Top = 8
Width = 348
Height = 23
Caption = 'A B C D E F G H I J K L M H O'
Color = clBackground
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -20
Font.Name = 'Courier New'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label2: TLabel
Left = 24
Top = 32
Width = 11
Height = 19
Caption = '1'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 24
Top = 56
Width = 11
Height = 19
Caption = '2'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 24
Top = 80
Width = 11
Height = 19
Caption = '3'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 24
Top = 104
Width = 11
Height = 19
Caption = '4'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 24
Top = 128
Width = 11
Height = 19
Caption = '5'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 24
Top = 152
Width = 11
Height = 19
Caption = '6'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 24
Top = 176
Width = 11
Height = 19
Caption = '7'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 24
Top = 200
Width = 11
Height = 19
Caption = '8'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 24
Top = 224
Width = 11
Height = 19
Caption = '9'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 16
Top = 248
Width = 22
Height = 19
Caption = '10'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 16
Top = 272
Width = 22
Height = 19
Caption = '11'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 16
Top = 296
Width = 22
Height = 19
Caption = '12'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 16
Top = 320
Width = 22
Height = 19
Caption = '13'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 16
Top = 344
Width = 22
Height = 19
Caption = '14'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 16
Top = 368
Width = 22
Height = 19
Caption = '15'
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'MS Gothic'
Font.Style = [fsBold]
ParentFont = False
end
object DrawGrid1: TDrawGrid
Left = 48
Top = 32
Width = 361
Height = 361
Cursor = crHandPoint
Color = clWhite
ColCount = 15
Ctl3D = False
DefaultColWidth = 23
DefaultRowHeight = 23
DefaultDrawing = False
FixedCols = 0
RowCount = 15
FixedRows = 0
ParentCtl3D = False
ScrollBars = ssNone
TabOrder = 0
OnMouseDown = DrawGrid1MouseDown
end
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 450
Height = 45
ButtonHeight = 40
Caption = 'ToolBar1'
Color = clScrollBar
ParentColor = False
TabOrder = 1
object SpeedButton1: TSpeedButton
Left = 0
Top = 2
Width = 65
Height = 40
Hint = #37325#26032#24320#22987
BiDiMode = bdLeftToRight
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00779999999999
999FFFFFFF9999999977779F99999F99999FFFFFF9999999F977779F99999F99
999FFFFF99999999F977779F99999F99999FFFFF99999999F977779F99999F99
999FFFF999999999F977779F99999F99999FFF9999999999F977779F99999F99
999FFF9999999999F977779F99999F99999FF99999999999F977779F99999F99
999FF99999999999F977779F99999F99999F999999F99999F977779F99999F99
999999999FF99999F977779F99999F99999999999FF99999F977779F99999F99
99999999FFF99999F977779F99999F9999999999FFF99999F977779F99999F99
999999999FF99999F977779F99999F999999999999F99999F977779F99999F99
998FF89999F99999F977779F99999F9999FFFF9999F99999F977779F99999F99
99FFFF9999F99999F977779F99999F99998FF89999F99999F977779F99999F99
9999999999F99999F977779F799999F9999999999F999997F977779FF999998F
99999999FF99999FF9777797F7999999FF99998FF999999F79777779FF999999
9FFFFFF9999999FF977777779F79999999999999999997F97777777779F79999
9999999999997F9777777777779F7999999999999997F977777777777779FF79
9999999997FF977777777777777799FFFFFFFFFFFF9977777777777777777799
9999999999777777777777777777777777777777777777777777}
ParentShowHint = False
ParentBiDiMode = False
ShowHint = True
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 65
Top = 2
Width = 65
Height = 40
Hint = #24110#21161
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777700777777777777777777777777777700910777777777777777777777777
7009900107777777777777777777777009900770107777777777777777777009
900FF7070107777777777777777009900FFFF70070107777777777777009900F
FFFFF770070107777777777009900FFFFFFFF7777770107777777009900FFFFF
FFF7787770770107777701900FFFFFFFF77000877007701077770107FFFFFFF7
700099087700770107770107FFFFF770009999908777777010770107FFFF7000
999999990877077701070107F770009999999999908700777010010770009999
9999999999087007770001000099999999999999999087777707010099999999
9999999FFF990870770700909999999999999FFF999990800707709909999999
99999999FF99990800077709909999999999999999FFF9908707777099099999
FFF99FF9FFF999990807777709909FF99F99F99999999999900777777099099F
FFF99999999999999900777777099099F99F9999999999999990777777709909
9FFFF99999999999900777777777099099999999999999900777777777777099
0999999999999007777777777777770990999999999007777777777777777770
9909999990077777777777777777777709909990077777777777777777777777
7099000777777777777777777777777777007777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton2Click
end
object SpeedButton4: TSpeedButton
Left = 130
Top = 2
Width = 65
Height = 40
Hint = #36864#20986#31243#24207
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888777777777777777777777888888888887777777
7777777777777778888880000000000000000000000007778888809999999999
99999999F777F077788880999999999990000999F888F7077788809999999990
FFFF9999F888F77077788099999900FFFFF99999F888F78707788079999FFFFF
F99999999F88F7870778807999999FFF000009999F88F7870778807999990FFF
FFFF00999F88F78707788079999FFF099FFFF0099F88F78707788079999FFF09
9FFFFF099F88F78707788079999FFF0999FFFF099F88F787077880F7999FFF00
99FFFF0099F8F787077880F7999FFFF0999FFFF099F8F787077880F7999FFFF0
999FFFF099F8F787077880F7999FFFF0999FFFF099F8F787077880F7999FFFF0
0999FFF099F8F787077880F89999FFFF0999FFF099F8F787077880F87999FFFF
0099FFF9999FF787077880F879999FFFF00FFF09999FF787077880F8799999FF
FFFFFF99999FF787077880F879999999FFFF9999999FF787077880FFF7999999
99999999999FF787077880F77799999999999999999F77870778880F88777777
7777777777778F7707788880F888888888888888888888F7077888880FFFFFFF
FFFFFFFFFFFFFFFF088888888000000000000000000000000888888888888888
8888888888888888888888888888888888888888888888888888}
Layout = blGlyphTop
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton4Click
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -