PC World Komputer 1998 January/Pcwk0198.iso/Wtestowe/CALYPSO/_SETUP.1/unzip.dll/0/RCDATA/TEXTRACTFORM/TEXTRACTFORM.txt

Text File | 1997-07-17 | 5.5 KB | 261 lines

object ExtractForm: TExtractForm
  Left = 265
  Top = 205
  ActiveControl = hcbExtractTo
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Extract file(s) from archive ...'
  ClientHeight = 213
  ClientWidth = 457
  Font.Color = clBlack
  Font.Height = -12
  Font.Name = 'Arial'
  Font.Style = []
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 15
  object Label1: TLabel
    Left = 19
    Top = 8
    Width = 57
    Height = 15
    AutoSize = False
    Caption = 'Extract &to:'
    FocusControl = btnExtract
  end
  object Label3: TLabel
    Left = 4
    Top = 187
    Width = 116
    Height = 15
    AutoSize = False
    Caption = '&Make new directory: '
    FocusControl = edNewFolder
  end
  object lbPassword: TLabel
    Left = 239
    Top = 120
    Width = 65
    Height = 15
    AutoSize = False
    Caption = '&Password:'
    FocusControl = edPassword
  end
  object sbBrowseDir: TSpeedButton
    Left = 407
    Top = 6
    Width = 20
    Height = 20
    Caption = '...'
    OnClick = sbBrowseDirClick
  end
  object Label2: TLabel
    Left = -5
    Top = 31
    Width = 79
    Height = 15
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'Destination: '
  end
  object lbDestinationInfo: TLabel
    Left = 75
    Top = 31
    Width = 94
    Height = 15
    Caption = 'lbDestinationInfo'
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Arial'
    Font.Style = [fsItalic]
    ParentFont = False
  end
  object hcbExtractTo: THistoryComboBox
    Left = 75
    Top = 5
    Width = 328
    Height = 23
    Hint = 'Select directory to extract files to ...'
    DropDownCount = 12
    ItemHeight = 15
    TabOrder = 0
    OnChange = hcbExtractToChange
    OnKeyDown = hcbExtractToKeyDown
    OnChoice = hcbExtractToChange
    CanEdit = True
    IniSection = 'UNZIPHistory'
    MaxHistoryLength = 25
  end
  object cbOverwrite: TCheckBox
    Left = 239
    Top = 55
    Width = 173
    Height = 17
    Caption = 'Over&write existing Files '
    TabOrder = 3
  end
  object cbFolderNames: TCheckBox
    Left = 239
    Top = 77
    Width = 173
    Height = 17
    Caption = '&Use Folder Names'
    State = cbChecked
    TabOrder = 4
  end
  object btnExtract: TButton
    Left = 91
    Top = 147
    Width = 79
    Height = 25
    Caption = '&Extract'
    Default = True
    ModalResult = 1
    TabOrder = 7
    OnClick = btnExtractClick
  end
  object btnCancel: TButton
    Left = 189
    Top = 147
    Width = 79
    Height = 25
    Cancel = True
    Caption = '&Cancel'
    ModalResult = 2
    TabOrder = 8
  end
  object rgFiles: TGroupBox
    Left = 4
    Top = 49
    Width = 229
    Height = 88
    Caption = ' Files '
    TabOrder = 2
    object rbSelectedFiles: TRadioButton
      Left = 5
      Top = 19
      Width = 117
      Height = 17
      Caption = '&Selected files'
      TabOrder = 0
      OnClick = rbAllFilesClick
    end
    object rbAllFiles: TRadioButton
      Left = 5
      Top = 41
      Width = 109
      Height = 17
      Caption = '&All files'
      TabOrder = 1
      OnClick = rbAllFilesClick
    end
    object rbFiles: TRadioButton
      Left = 5
      Top = 62
      Width = 53
      Height = 17
      Caption = 'F&iles: '
      TabOrder = 2
      OnClick = rbFilesClick
    end
    object hcbFiles: THistoryComboBox
      Left = 58
      Top = 59
      Width = 164
      Height = 23
      DropDownCount = 10
      ItemHeight = 15
      TabOrder = 3
      OnChange = hcbFilesFocusLost
      OnFocusLost = hcbFilesFocusLost
      OnChoice = hcbFilesFocusLost
      CanEdit = True
      IniSection = 'UNZIPFiles'
      MaxHistoryLength = 15
    end
  end
  object edNewFolder: TEdit
    Left = 120
    Top = 183
    Width = 216
    Height = 23
    TabOrder = 10
    OnChange = edNewFolderChange
    OnEnter = edNewFolderEnter
  end
  object btnOKFolder: TButton
    Left = 343
    Top = 183
    Width = 51
    Height = 23
    Caption = '&OK'
    TabOrder = 11
    OnClick = btnOKFolderClick
  end
  object btnCancelFolder: TButton
    Left = 401
    Top = 183
    Width = 51
    Height = 23
    Caption = 'Ca&ncel'
    TabOrder = 12
    OnClick = btnCancelFolderClick
    OnExit = btnCancelFolderExit
  end
  object cbVolName: TCheckBox
    Left = 239
    Top = 98
    Width = 173
    Height = 17
    Caption = 'Update &Volume label'
    TabOrder = 5
  end
  object edPassword: TEdit
    Left = 302
    Top = 116
    Width = 151
    Height = 23
    PasswordChar = '*'
    TabOrder = 6
    OnChange = edPasswordChange
  end
  object btnHelp: TButton
    Left = 287
    Top = 147
    Width = 79
    Height = 25
    Cancel = True
    Caption = '&Help'
    TabOrder = 9
    OnClick = btnHelpClick
  end
  object btnNewFolder: TBitBtn
    Left = 432
    Top = 6
    Width = 21
    Height = 20
    TabOrder = 1
    OnClick = btnNewFolderClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333300000000000033388888888888803338FB7B7B7B7B803338F7B7B7B7B78
      03338FB7B7B7B7B803338F7B7B7B7B7803338FB7B7B7B7B803338F7B7B7B7B78
      03038FFFFFFFFFF800338B7B7B788880333338B7B78030000030338888333300
      0333333333333030303333333333033333033333333333303333}
  end
  object BrowseDir: TBrowseDirectoryDlg
    Selection = 'C:\'
    Root = idDrives
    Options = [bfDirectoriesOnly]
    EnableOKButton = False
    Left = 186
    Top = 61
  end
end