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
  Color = clPurple
  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 = '-'
      end
      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