object DrawSqr: TDrawSqr
  Left = 200
  Top = 99
  AutoScroll = False
  Caption = 'Draw Squares'
  ClientHeight = 292
  ClientWidth = 427
  Color = clBlack
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  OnCreate = FormCreate
  TextHeight = 16
  object Timer1: TTimer
    Interval = 1
    OnTimer = Timer1Timer
    Left = 16
    Top = 16
  end
end