home *** CD-ROM | disk | FTP | other *** search
- object ExtractForm: TExtractForm
- Left = 200
- Top = 108
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = 'Where would you like to extract the files to?'
- ClientHeight = 446
- ClientWidth = 353
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 13
- object Dock971: TDock97
- Left = 0
- Top = 0
- Width = 353
- Height = 26
- AllowDrag = False
- object Toolbar971: TToolbar97
- Left = 0
- Top = 0
- Caption = 'Toolbar971'
- DockPos = 0
- DragHandleStyle = dhNone
- TabOrder = 0
- object ZipDir: TPTShellCombo
- Left = 0
- Top = 0
- Width = 348
- Height = 22
- ShellList = ZipFile
- TabOrder = 0
- end
- end
- end
- object Dock972: TDock97
- Left = 252
- Top = 26
- Width = 101
- Height = 420
- AllowDrag = False
- Position = dpRight
- object Toolbar972: TToolbar97
- Left = 0
- Top = 0
- Caption = 'Toolbar972'
- DockPos = 0
- DragHandleStyle = dhNone
- TabOrder = 0
- object ToolbarButton971: TToolbarButton97
- Left = 0
- Top = 0
- Width = 97
- Height = 22
- Caption = 'OK'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ModalResult = 1
- ParentFont = False
- OnClick = ToolbarButton971Click
- end
- object ToolbarSep971: TToolbarSep97
- Left = 0
- Top = 22
- Blank = True
- end
- object Cancel: TToolbarButton97
- Left = 0
- Top = 28
- Width = 97
- Height = 22
- Caption = 'Cancel'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ModalResult = 2
- ParentFont = False
- end
- object ToolbarSep972: TToolbarSep97
- Left = 0
- Top = 80
- Blank = True
- end
- object ToolbarSep973: TToolbarSep97
- Left = 0
- Top = 74
- Blank = True
- end
- object ToolbarSep974: TToolbarSep97
- Left = 0
- Top = 50
- Blank = True
- end
- object ToolbarSep975: TToolbarSep97
- Left = 0
- Top = 68
- Blank = True
- end
- object ToolbarSep976: TToolbarSep97
- Left = 0
- Top = 62
- Blank = True
- end
- object ToolbarSep977: TToolbarSep97
- Left = 0
- Top = 56
- Blank = True
- end
- object ToolbarSep978: TToolbarSep97
- Left = 0
- Top = 126
- Blank = True
- end
- object ToolbarSep979: TToolbarSep97
- Left = 0
- Top = 103
- Blank = True
- end
- object Overwrite: TCheckBox
- Left = 0
- Top = 109
- Width = 97
- Height = 17
- Caption = 'Overwrite'
- TabOrder = 0
- end
- object FolderNames: TCheckBox
- Left = 0
- Top = 132
- Width = 97
- Height = 17
- Caption = 'Use Pathnames'
- TabOrder = 1
- end
- object Allfiles: TCheckBox
- Left = 0
- Top = 86
- Width = 97
- Height = 17
- Caption = 'All Files'
- TabOrder = 2
- end
- end
- end
- object ZipFile: TPTShellList
- Left = 0
- Top = 26
- Width = 252
- Height = 420
- Align = alClient
- ReadOnly = False
- IconOptions.AutoArrange = True
- TabOrder = 2
- end
- end
-