unit1.dfm

进行轨迹追踪的实验,用于体育训练中

object Form1: TForm1
  Left = 204
  Top = 136
  Width = 929
  Height = 565
  Cursor = crCross
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnMouseMove = FormMouseMove
  OnPaint = FormPaint
  PixelsPerInch = 96
  TextHeight = 13
  object Shape1: TShape
    Left = 10
    Top = 300
    Width = 9
    Height = 17
    Brush.Color = clRed
    Pen.Color = clRed
    Pen.Mode = pmMergePenNot
    Pen.Style = psClear
    Shape = stCircle
  end
  object Shape2: TShape
    Left = 10
    Top = 300
    Width = 9
    Height = 17
    Brush.Color = clRed
    Pen.Color = clBlue
    Pen.Mode = pmMaskNotPen
    Pen.Style = psClear
    Shape = stCircle
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 921
    Height = 81
    TabOrder = 0
    object Label1: TLabel
      Left = 296
      Top = 13
      Width = 7
      Height = 13
      Caption = 'X'
    end
    object Label2: TLabel
      Left = 368
      Top = 13
      Width = 7
      Height = 13
      Caption = 'Y'
    end
    object Label3: TLabel
      Left = 298
      Top = 37
      Width = 7
      Height = 13
      Caption = 'X'
    end
    object Label4: TLabel
      Left = 369
      Top = 34
      Width = 7
      Height = 13
      Caption = 'Y'
    end
    object Label5: TLabel
      Left = 256
      Top = 36
      Width = 36
      Height = 13
      Caption = #40736#26631#65306
    end
    object Label6: TLabel
      Left = 256
      Top = 13
      Width = 36
      Height = 13
      Caption = #20809#28857#65306
    end
    object Button2: TButton
      Left = 16
      Top = 40
      Width = 75
      Height = 25
      Caption = #20851#38381
      TabOrder = 0
      OnClick = Button2Click
    end
    object Button1: TButton
      Left = 16
      Top = 8
      Width = 75
      Height = 25
      Caption = #24320#22987
      TabOrder = 1
      OnClick = Button1Click
    end
    object Edit1: TEdit
      Left = 312
      Top = 8
      Width = 41
      Height = 21
      TabOrder = 2
      Text = 'Edit1'
    end
    object Edit2: TEdit
      Left = 384
      Top = 8
      Width = 41
      Height = 21
      TabOrder = 3
      Text = 'Edit2'
    end
    object Edit3: TEdit
      Left = 312
      Top = 32
      Width = 41
      Height = 21
      TabOrder = 4
      Text = 'Edit3'
    end
    object Edit4: TEdit
      Left = 384
      Top = 32
      Width = 41
      Height = 21
      TabOrder = 5
      Text = 'Edit4'
    end
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 100
    OnTimer = Timer1Timer
    Left = 104
    Top = 8
  end
  object Timer2: TTimer
    Enabled = False
    Interval = 100
    OnTimer = Timer2Timer
    Left = 144
    Top = 8
  end
  object Timer3: TTimer
    Enabled = False
    Interval = 10000
    OnTimer = Timer3Timer
    Left = 184
    Top = 8
  end
end