object Form1: TForm1 Left = 158 Height = 536 Top = 196 Width = 857 Caption = 'Form1' ClientHeight = 536 ClientWidth = 857 OnMouseDown = FormMouseDown OnPaint = FormPaint LCLVersion = '1.6.2.0' object Button1: TButton Left = 736 Height = 25 Top = 8 Width = 91 Caption = 'Start/Stop' OnClick = Button1Click TabOrder = 0 end object Timer1: TTimer Enabled = False Interval = 100 OnTimer = Timer1Timer left = 16 top = 16 end end