object Visual: TVisual
  Left = 323
  Top = 231
  BorderStyle = bsSingle
  Caption = 'Visual'
  ClientHeight = 267
  ClientWidth = 431
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Position = poDefault
  Scaled = False
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDeactivate = FormDeactivate
  OnHide = FormHide
  OnKeyDown = FormKeyDown
  OnMouseDown = FormMouseDown
  OnMouseMove = FormMouseMove
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Timer1: TTimer
    Interval = 500
    OnTimer = Timer1Timer
    Left = 20
    Top = 228
  end
end