object Form1: TForm1 Cursor = crNone Left = 188 Height = 517 Top = 214 Width = 737 Caption = 'Form1' OnMouseMove = FormMouseMove OnPaint = FormPaint LCLVersion = '1.6.2.0' object Timer1: TTimer Interval = 100 OnTimer = Timer1Timer left = 16 top = 16 end end