vc62.~dfm

模拟电脑鼠走迷宫,并可通过串口连接电脑鼠

object Form1: TForm1
  Left = 221
  Top = 128
  Width = 577
  Height = 482
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnMouseDown = FormMouseDown
  OnPaint = draw
  PixelsPerInch = 96
  TextHeight = 13
  object Shape1: TShape
    Left = 496
    Top = 8
    Width = 33
    Height = 33
  end
  object Label2: TLabel
    Left = 464
    Top = 160
    Width = 84
    Height = 20
    Caption = 'Y'#22352#26631'    0    '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label1: TLabel
    Left = 464
    Top = 128
    Width = 84
    Height = 20
    Caption = 'X'#22352#26631'    0    '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Shape2: TShape
    Left = 488
    Top = 56
    Width = 49
    Height = 49
    Shape = stCircle
  end
  object Label3: TLabel
    Left = 472
    Top = 192
    Width = 77
    Height = 20
    Caption = #27493#25968'    0     '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 456
    Top = 224
    Width = 85
    Height = 20
    Caption = #36716#24367#25968'   0    '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -16
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Button1: TButton
    Left = 472
    Top = 336
    Width = 81
    Height = 25
    Caption = #25163#21160
    TabOrder = 0
    OnClick = Button1Click
    OnKeyPress = Button1KeyPress
  end
  object Button2: TButton
    Left = 472
    Top = 376
    Width = 81
    Height = 25
    Caption = #33258#21160
    TabOrder = 1
    OnClick = Button2Click
  end
  object MainMenu1: TMainMenu
    Left = 480
    Top = 40
    object N1: TMenuItem
      Caption = #25991#20214
      object N2: TMenuItem
        Caption = #26032#24314
        ShortCut = 16462
        OnClick = N2Click
      end
      object N3: TMenuItem
        Caption = #25171#24320
        ShortCut = 16463
        OnClick = N3Click
      end
      object N4: TMenuItem
        Caption = #20445#23384
        ShortCut = 16467
        OnClick = N4Click
      end
      object N5: TMenuItem
        Caption = #21478#23384#20026
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object N7: TMenuItem
        Caption = #36864#20986
        OnClick = N7Click
      end
    end
    object N8: TMenuItem
      Caption = #25805#20316
      object N9: TMenuItem
        Caption = #25163#21160
        OnClick = N9Click
      end
      object N10: TMenuItem
        Caption = #33258#21160
        OnClick = N10Click
      end
    end
  end
  object OpenDialog1: TOpenDialog
    Filter = 'ROD|*.ROD'
    Left = 464
    Top = 264
  end
  object SaveDialog1: TSaveDialog
    Filter = 'ROD|*.ROD'
    Left = 512
    Top = 264
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 200
    OnTimer = Timer1Timer
    Left = 528
    Top = 40
  end
  object Timer2: TTimer
    Enabled = False
    Interval = 80
    OnTimer = Timer2Timer
    Left = 528
    Top = 80
  end
end