?? unit1.~dfm
字號:
object Form1: TForm1
Left = 141
Top = 9
AlphaBlendValue = 200
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = #21452#20154#23545#25112#20420#32599#26031
ClientHeight = 455
ClientWidth = 509
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = False
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnKeyUp = FormKeyUp
PixelsPerInch = 96
TextHeight = 13
object PaintBox1: TPaintBox
Left = 10
Top = 80
Width = 225
Height = 360
OnPaint = PaintBox1Paint
end
object PaintBox2: TPaintBox
Left = 272
Top = 80
Width = 225
Height = 360
OnPaint = PaintBox2Paint
end
object Image1: TImage
Left = 240
Top = 8
Width = 15
Height = 15
Center = True
Picture.Data = {
07544269746D617006030000424D060300000000000036000000280000000F00
00000F0000000100180000000000D0020000120B0000120B0000000000000000
0000FCA5A5FFACACFFB6B7FFBEBEFFC4C4FFC8C8FFCCCCFFCCCCFFCDCDFFD0D1
FFD5D5FFD7D7FFD9D9FFD6D6FFCECE000000CC8B8BFFA8A8FFA2A2FF9D9DFF98
98FF9292FF8D8DFF8988FF8383FF7F7EFF7A7AFF7475FF6F70FF6A6BFFC9C900
0000926667FFAEAEFFA8A9FFA3A2FF9D9DFF9998FF9393FF8E8EFF8888FF8484
FF7F7FFF7A7BFF7575FF7070FFBDBD000000654949FFB4B4FFAEAEFFA9A9FFA3
A4FF9E9EFF9999FF9493FF8F8EFF8989FF8484FF8080FF7B7BFF7675FFB2B300
0000413131FFBABAFFB4B4FFAFAEFFAAA9FFA4A4FF9E9FFF9999FF9494FF8F8F
FF898AFF8584FF8080FF7B7BFFA9A9000000403131FFC0BFFFBABAFFB4B5FFB0
AFFFAAAAFFA4A4FF9F9FFF9A99FF9494FF8F8FFF8A8AFF8585FF8080FFA1A100
0000403333FFC5C6FFC0C0FFBBBAFFB5B5FFB0AFFFAAABFFA5A5FF9F9FFF9A9A
FF9595FF908FFF8B8AFF8585FF9A9B000000403434FFCBCBFFC6C5FFC1C1FFBB
BCFFB5B6FFB0B0FFABAAFFA5A5FFA09FFF9B9BFF9595FF9090FF8A8AFF9A9A00
0000403536FFD1D1FFCBCCFFC6C6FFC1C1FFBCBBFFB6B6FFB0B1FFACABFFA6A6
FFA0A0FF9B9BFF9595FF9090FF9A9A000000403737FFD6D6FFD2D1FFCCCCFFC7
C7FFC1C1FFBCBCFFB6B7FFB1B1FFACACFFA6A6FFA1A0FF9B9BFF9696FF959500
0000403838FFDBDCFFD7D6FFD1D2FFCCCCFFC7C7FFC2C1FFBDBCFFB7B7FFB1B2
FFACACFFA7A7FFA1A1FF9C9BF38F8F000000403939FFE1E0FFDCDCFFD7D7FFD2
D2FFCDCDFFC8C7FFC2C2FFBDBDFFB8B7FFB2B2FFACACFFA7A7FFA2A2D8848400
0000403B3BFFE5E5FFE1E1FFDCDDFFD8D7FFD3D2FFCDCDFFC8C8FFC2C2FFBEBD
FFB7B8FFB3B2FFACADFFA8A7B97676000000403C3CFFEAEAFFE5E5FFE1E1FFDD
DDFFD8D8FFD2D3FFCECEFFC9C8FFC3C3FFBDBEFFB8B8FFB2B3FFADAD8D5D5D00
0000403D3D403C3C403B3B403A3A403839403737403636403535403434403232
403131403030402E2E412E2E785252000000}
Stretch = True
Visible = False
end
object Bevel1: TBevel
Left = 7
Top = 4
Width = 232
Height = 439
end
object Bevel2: TBevel
Left = 268
Top = 4
Width = 232
Height = 439
end
object Label5: TLabel
Left = 21
Top = 210
Width = 202
Height = 62
Alignment = taCenter
AutoSize = False
Caption = 'YOU'
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -59
Font.Name = #24188#22278
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label6: TLabel
Left = 22
Top = 288
Width = 202
Height = 62
Alignment = taCenter
AutoSize = False
Caption = 'WIN'
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -59
Font.Name = #24188#22278
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label7: TLabel
Left = 284
Top = 208
Width = 202
Height = 62
Alignment = taCenter
AutoSize = False
Caption = 'YOU'
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -59
Font.Name = #24188#22278
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label8: TLabel
Left = 285
Top = 288
Width = 202
Height = 62
Alignment = taCenter
AutoSize = False
Caption = 'WIN'
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -59
Font.Name = #24188#22278
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Panel1: TPanel
Left = 10
Top = 6
Width = 225
Height = 82
BevelOuter = bvNone
Color = clBlack
TabOrder = 0
object PaintBox3: TPaintBox
Left = 143
Top = 2
Width = 82
Height = 76
Color = clSkyBlue
ParentColor = False
end
object Bevel3: TBevel
Left = 130
Top = 77
Width = 97
Height = 3
end
object Bevel5: TBevel
Left = 130
Top = -3
Width = 4
Height = 81
end
object Label1: TLabel
Left = 2
Top = 8
Width = 126
Height = 25
Alignment = taCenter
AutoSize = False
Caption = 'won 0'
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clLime
Font.Height = -24
Font.Name = #24188#22278
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label2: TLabel
Left = 2
Top = 42
Width = 126
Height = 25
Alignment = taCenter
AutoSize = False
Caption = 'lost 0'
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clLime
Font.Height = -24
Font.Name = #24188#22278
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
end
object Panel2: TPanel
Left = 272
Top = 6
Width = 225
Height = 82
BevelOuter = bvNone
Color = clBlack
TabOrder = 1
object PaintBox4: TPaintBox
Left = 8
Top = 1
Width = 82
Height = 76
Color = clSkyBlue
ParentColor = False
end
object Bevel4: TBevel
Left = -3
Top = 77
Width = 97
Height = 3
end
object Bevel6: TBevel
Left = 91
Top = -3
Width = 4
Height = 81
end
object Label3: TLabel
Left = 98
Top = 8
Width = 125
Height = 25
Alignment = taCenter
AutoSize = False
Caption = 'won 0'
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clLime
Font.Height = -24
Font.Name = #24188#22278
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label4: TLabel
Left = 98
Top = 42
Width = 125
Height = 25
Alignment = taCenter
AutoSize = False
Caption = 'lost 0'
Color = clBlack
Font.Charset = GB2312_CHARSET
Font.Color = clLime
Font.Height = -24
Font.Name = #24188#22278
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
end
object MainMenu1: TMainMenu
Left = 235
Top = 126
object MenuGame: TMenuItem
Caption = #28216#25103'(&G)'
OnClick = MenuGameClick
object MenuStart: TMenuItem
Caption = #24320#22987#28216#25103'(&S) '
ShortCut = 114
OnClick = MenuStartClick
end
object MenuPause: TMenuItem
Caption = #26242#20572#28216#25103'(&P)'
Enabled = False
ShortCut = 112
OnClick = MenuPauseClick
end
object MenuContinue: TMenuItem
Caption = #32487#32493#28216#25103'(&C)'
Enabled = False
ShortCut = 113
OnClick = MenuContinueClick
end
object N1: TMenuItem
Caption = '-'
object MenuReplay: TMenuItem
Caption = #37325#26032#24320#22987'(&R)'
ShortCut = 116
OnClick = MenuReplayClick
end
object N16: TMenuItem
Caption = '-'
end
object MenuExit: TMenuItem
Caption = #36864#20986'(&X)'
OnClick = MenuExitClick
end
end
object MenuOption: TMenuItem
Caption = #36873#39033'(&O)'
OnClick = MenuOptionClick
object MenuSound: TMenuItem
Caption = #38899#25928'(&A)'
Checked = True
ShortCut = 116
OnClick = MenuSoundClick
end
object N10: TMenuItem
Caption = '-'
end
object MenuKeyboard: TMenuItem
Caption = #38190#30424#35774#23450'(&K)...'
OnClick = MenuKeyboardClick
end
end
object N2: TMenuItem
Caption = #20851#20110
OnClick = N2Click
object N3: TMenuItem
Caption = #20851#20110'<>'
OnClick = N3Click
end
object N5551: TMenuItem
end
end
end
object DXTimer1: TDXTimer
ActiveOnly = True
Enabled = False
Interval = 80
OnTimer = DXTimer1Timer
Left = 236
Top = 168
end
object Timer1: TTimer
Enabled = False
Interval = 300
OnTimer = Timer1Timer
Left = 144
Top = 120
end
object Timer2: TTimer
Enabled = False
Interval = 250
OnTimer = Timer2Timer
Left = 232
Top = 96
end
object DXInput1: TDXInput
ActiveOnly = True
Joystick.BindInputStates = True
Joystick.Effects.Effects = {
FF0A0044454C50484958464F524345464545444241434B454646454354003010
7F000000545046301D54466F726365466565646261636B456666656374436F6D
706F6E656E74025F3107456666656374730E01044E616D650607456666656374
730A45666665637454797065070665744E6F6E6506506572696F64023205506F
7765720310270454696D6503E8030E537461727444656C617954696D65020000
000000}
Joystick.Enabled = True
Joystick.ForceFeedback = False
Joystick.AutoCenter = True
Joystick.DeadZoneX = 50
Joystick.DeadZoneY = 50
Joystick.DeadZoneZ = 50
Joystick.ID = 0
Joystick.RangeX = 1000
Joystick.RangeY = 1000
Joystick.RangeZ = 1000
Keyboard.BindInputStates = True
Keyboard.Effects.Effects = {
FF0A0044454C50484958464F524345464545444241434B454646454354003010
7F000000545046301D54466F726365466565646261636B456666656374436F6D
706F6E656E74025F3107456666656374730E01044E616D650607456666656374
730A45666665637454797065070665744E6F6E6506506572696F64023205506F
7765720310270454696D6503E8030E537461727444656C617954696D65020000
000000}
Keyboard.Enabled = True
Keyboard.ForceFeedback = False
Keyboard.Assigns = {
5700000000000000490000000000000026000000680000005300000000000000
4B00000000000000280000006500000041000000000000004A00000000000000
250000006400000044000000000000004C000000000000002700000066000000
2000000000000000000000000000000060000000000000000000000000000000
0000000000000000000000000000000071000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000}
Mouse.BindInputStates = False
Mouse.Effects.Effects = {
FF0A0044454C50484958464F524345464545444241434B454646454354003010
7F000000545046301D54466F726365466565646261636B456666656374436F6D
706F6E656E74025F3107456666656374730E01044E616D650607456666656374
730A45666665637454797065070665744E6F6E6506506572696F64023205506F
7765720310270454696D6503E8030E537461727444656C617954696D65020000
000000}
Mouse.Enabled = False
Mouse.ForceFeedback = False
UseDirectInput = True
Left = 224
Top = 224
end
object Timer3: TTimer
Enabled = False
Interval = 300
OnTimer = Timer3Timer
Left = 424
Top = 160
end
object Timer4: TTimer
Enabled = False
Interval = 600
OnTimer = Timer4Timer
Left = 240
Top = 256
end
object ApplicationEvents1: TApplicationEvents
OnActivate = ApplicationEvents1Activate
OnDeactivate = ApplicationEvents1Deactivate
OnMinimize = ApplicationEvents1Minimize
OnRestore = ApplicationEvents1Restore
Left = 248
Top = 240
end
object Timer5: TTimer
Enabled = False
Interval = 166
OnTimer = Timer5Timer
Left = 240
Top = 312
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -