object MainForm: TMainForm
  Left = 204
  Top = 188
  ActiveControl = Edit1
  AutoScroll = False
  Caption = 'Raising an Exception'
  ClientHeight = 168
  ClientWidth = 459
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'System'
  Font.Style = []
  OldCreateOrder = True
  PixelsPerInch = 120
  TextHeight = 20
  object Label1: TLabel
    Left = 70
    Top = 40
    Width = 179
    Height = 40
    Caption = 'Enter a value between 0 and 99:'
    WordWrap = True
  end
  object Label2: TLabel
    Left = 70
    Top = 120
    Width = 175
    Height = 20
    Caption = 'Click here when done:'
  end
  object Edit1: TEdit
    Left = 290
    Top = 50
    Width = 151
    Height = 28
    TabOrder = 0
  end
  object Button1: TButton
    Left = 290
    Top = 110
    Width = 151
    Height = 41
    Cursor = crDrag
    Caption = 'I'#39'm done!'
    TabOrder = 1
    OnClick = Button1Click
  end
end