object MainForm: TMainForm
  Left = 261
  Top = 106
  BorderStyle = bsDialog
  Caption = 'reSource Demo 2'
  ClientHeight = 394
  ClientWidth = 443
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 335
    Height = 13
    Caption = 
      'This demo shows the use of CompressToFile and DecompressFromFile' +
      '.'
  end
  object Label2: TLabel
    Left = 8
    Top = 24
    Width = 312
    Height = 13
    Caption = 
      'These procedures compress  one file to it'#39's corresponding archiv' +
      'e.'
  end
  object Label3: TLabel
    Left = 29
    Top = 59
    Width = 44
    Height = 13
    Caption = 'File Path:'
    FocusControl = SourceFileEdit
  end
  object Label4: TLabel
    Left = 8
    Top = 81
    Width = 64
    Height = 13
    Caption = 'Archive Path:'
    FocusControl = ArchiveFileEdit
  end
  object Label5: TLabel
    Left = 148
    Top = 374
    Width = 131
    Height = 18
    Caption = 'reSource Demo 2'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = 'Arial'
    Font.Style = [fsBold, fsItalic]
    ParentFont = False
  end
  object Bevel1: TBevel
    Left = 0
    Top = 155
    Width = 441
    Height = 9
    Shape = bsBottomLine
  end
  object Label6: TLabel
    Left = 8
    Top = 218
    Width = 64
    Height = 13
    Caption = 'Archive Path:'
    FocusControl = DecompressArchiveEdit
  end
  object Label7: TLabel
    Left = 8
    Top = 179
    Width = 106
    Height = 13
    Caption = 'Name of file to extract:'
  end
  object Label8: TLabel
    Left = 264
    Top = 172
    Width = 157
    Height = 13
    Caption = '(The file must exist in the archive)'
  end
  object Label9: TLabel
    Left = 8
    Top = 245
    Width = 72
    Height = 13
    Caption = 'Destination Dir:'
  end
  object Label10: TLabel
    Left = 264
    Top = 188
    Width = 143
    Height = 13
    Caption = 'Leave blank to extract all files.'
  end
  object CompressBtn: TButton
    Left = 56
    Top = 120
    Width = 345
    Height = 33
    Caption = 'Compress File to Archive'
    TabOrder = 4
    OnClick = CompressBtnClick
  end
  object DecompressBtn: TButton
    Left = 56
    Top = 337
    Width = 345
    Height = 33
    Caption = 'Decompress File From Archive'
    TabOrder = 9
    OnClick = DecompressBtnClick
  end
  object SourceFileEdit: TEdit
    Left = 80
    Top = 54
    Width = 321
    Height = 21
    TabOrder = 0
  end
  object ArchiveFileEdit: TEdit
    Left = 80
    Top = 78
    Width = 321
    Height = 21
    TabOrder = 2
  end
  object BrowseSourceBtn: TButton
    Left = 408
    Top = 55
    Width = 25
    Height = 21
    Caption = '...'
    TabOrder = 1
    OnClick = BrowseSourceBtnClick
  end
  object BrowseArchiveBtn: TButton
    Left = 408
    Top = 79
    Width = 25
    Height = 21
    Caption = '...'
    TabOrder = 3
    OnClick = BrowseArchiveBtnClick
  end
  object DecompressArchiveEdit: TEdit
    Left = 88
    Top = 215
    Width = 313
    Height = 21
    TabOrder = 6
  end
  object BrowseBtn2: TButton
    Left = 408
    Top = 216
    Width = 25
    Height = 21
    Caption = '...'
    TabOrder = 7
    OnClick = BrowseBtn2Click
  end
  object ExtractFileNameEdit: TEdit
    Left = 124
    Top = 175
    Width = 133
    Height = 21
    TabOrder = 5
  end
  object DirListBox: TDirectoryListBox
    Left = 89
    Top = 245
    Width = 169
    Height = 81
    ItemHeight = 16
    TabOrder = 8
  end
  object SaveDialog1: TSaveDialog
    Filter = 'reSource Archive (*.rs)|*.rs'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
    Title = 'The File To Compress'
    Left = 408
    Top = 104
  end
  object OpenDialog1: TOpenDialog
    Title = 'Select Archive File. Type a new name to Create a new Archive.'
    Left = 400
    Top = 24
  end
  object Resource1: TResource
    Left = 8
    Top = 104
  end
end