object Fsetup: TFsetup
  Left = 341
  Top = 227
  BorderIcons = [biSystemMenu]
  BorderStyle = bsToolWindow
  Caption = 'AtomNet Setup'
  ClientHeight = 180
  ClientWidth = 386
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 29
    Top = 57
    Width = 79
    Height = 13
    Caption = 'Program location'
  end
  object mes: TLabel
    Left = 103
    Top = 108
    Width = 180
    Height = 13
    Alignment = taCenter
    AutoSize = False
  end
  object Image1: TImage
    Left = 29
    Top = 14
    Width = 32
    Height = 32
    AutoSize = True
    Picture.Data = {<image000.ico>}
  end
  object Label2: TLabel
    Left = 72
    Top = 15
    Width = 235
    Height = 16
    Caption = 'AtomNetPE 1.05 (c) Change7 1999'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object UrlLabel1: TUrlLabel
    Left = 72
    Top = 33
    Width = 111
    Height = 16
    Cursor = 5
    Caption = 'www.change7.com'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsUnderline]
    ParentFont = False
    PopupMenu = UrlLabel1.
    URL = 'http://change7.com'
  end
  object Edit1: TEdit
    Left = 29
    Top = 73
    Width = 271
    Height = 21
    TabOrder = 0
  end
  object Button1: TButton
    Left = 307
    Top = 73
    Width = 50
    Height = 22
    Caption = 'Browse'
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 109
    Top = 142
    Width = 75
    Height = 24
    Caption = 'Install'
    Default = True
    TabOrder = 2
    OnClick = Button2Click
  end
  object closeb: TButton
    Left = 202
    Top = 142
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Close'
    TabOrder = 3
    OnClick = closebClick
  end
  object pbar: TProgressBar
    Left = 103
    Top = 108
    Width = 180
    Height = 16
    Min = 0
    Max = 100
    TabOrder = 4
    Visible = False
  end
  object FolderBrowse1: TFolderBrowse
    Left = 3
    Top = 133
  end
  object files: TStringHolder
    Strings.Strings = (
      'index.zit'
      'atomnet.exe'
      'uninst.exe'
      'urls.ini')
    Left = 331
    Top = 20
  end
end