object FormScreen: TFormScreen Left = 355 Height = 676 Top = 303 Width = 1017 Caption = 'Screen' ClientHeight = 676 ClientWidth = 1017 DesignTimePPI = 144 OnCreate = FormCreate OnDestroy = FormDestroy LCLVersion = '2.2.6.0' object PaintBox1: TPaintBox Left = 8 Height = 664 Top = 0 Width = 998 Anchors = [akTop, akLeft, akRight, akBottom] OnPaint = PaintBox1Paint end object Timer1: TTimer Interval = 25 OnTimer = Timer1Timer Left = 409 Top = 296 end end