object shstart: Tshstart
  Left = 115
  Top = 63
  BorderStyle = bsDialog
  Caption = 'Utility Belt Installation'
  ClientHeight = 216
  ClientWidth = 286
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 60
    Top = 96
    Width = 42
    Height = 13
    Caption = 'Install to:'
  end
  object Label2: TLabel
    Left = 60
    Top = 136
    Width = 76
    Height = 13
    Caption = 'Directory Name:'
  end
  object Memo1: TMemo
    Left = 4
    Top = 4
    Width = 277
    Height = 85
    BorderStyle = bsNone
    Color = clBtnFace
    Lines.Strings = (
      'This will install Utility Belt (Shareware Evaluation Version) '
      'to your hard disk drive. '
      'You will need around 20Mb free on the selected drive.'
      'Please follow the on-screen prompts during installation.'
      'It is recommended that you close any other applications'
      'before installation begins.')
    ReadOnly = True
    TabOrder = 0
  end
  object DriveComboBox1: TDriveComboBox
    Left = 60
    Top = 112
    Width = 145
    Height = 19
    TabOrder = 1
  end
  object Edit1: TEdit
    Left = 60
    Top = 152
    Width = 145
    Height = 21
    TabOrder = 2
    Text = 'Utility Belt (Shareware)'
  end
  object Button1: TButton
    Left = 12
    Top = 184
    Width = 75
    Height = 25
    Caption = 'OK'
    TabOrder = 3
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 180
    Top = 184
    Width = 75
    Height = 25
    Caption = 'Cancel'
    TabOrder = 4
    OnClick = Button2Click
  end
end