object Form1: TForm1
  Left = 280
  Top = 223
  BorderStyle = bsDialog
  Caption = 'Cyberball Demo Setup Program'
  ClientHeight = 245
  ClientWidth = 632
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Position = poScreenCenter
  PrintScale = poNone
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 16
  object InstallBar: TPanel
    Left = 41
    Top = 50
    Width = 560
    Height = 143
    TabOrder = 5
    Visible = False
    object FileProg: TGauge
      Left = 20
      Top = 66
      Width = 530
      Height = 29
      Color = clBtnFace
      ForeColor = clBlue
      ParentColor = False
      Progress = 0
    end
    object AllProg: TGauge
      Left = 20
      Top = 105
      Width = 530
      Height = 28
      ForeColor = clBlue
      Progress = 0
    end
    object FName: TLabel
      Left = 12
      Top = 6
      Width = 3
      Height = 16
    end
    object FromDir: TLabel
      Left = 12
      Top = 26
      Width = 3
      Height = 16
    end
    object ToDir: TLabel
      Left = 11
      Top = 43
      Width = 3
      Height = 16
    end
  end
  object Install: TButton
    Left = 526
    Top = 34
    Width = 75
    Height = 26
    Caption = '&Install'
    TabOrder = 3
    OnClick = InstallClick
  end
  object Exit: TButton
    Left = 526
    Top = 85
    Width = 75
    Height = 26
    Caption = 'E&xit'
    TabOrder = 4
    OnClick = ExitClick
  end
  object MousePort: TRadioGroup
    Left = 354
    Top = 20
    Width = 87
    Height = 109
    Caption = 'Mouse Port'
    ItemIndex = 0
    Items.Strings = (
      'None'
      'COM 1'
      'COM 2'
      'PS/2')
    TabOrder = 1
  end
  object PathPanel: TPanel
    Left = 41
    Top = 153
    Width = 560
    Height = 70
    TabOrder = 2
    object Label1: TLabel
      Left = 17
      Top = 27
      Width = 57
      Height = 16
      Caption = 'Install To:'
    end
    object EditPath: TEdit
      Left = 89
      Top = 25
      Width = 450
      Height = 24
      MaxLength = 50
      TabOrder = 0
      Text = 'C:\Cyberball Demo\'
      OnEnter = EditPathEnter
    end
  end
  object SoundCard: TRadioGroup
    Left = 118
    Top = 20
    Width = 171
    Height = 133
    Caption = 'SoundCard Optoins'
    ItemIndex = 0
    Items.Strings = (
      'AutoDetect'
      'None'
      'Sound Blaster'
      'GUS (hardware mixing)'
      'GUS (software mixing)')
    TabOrder = 0
  end
end