object DLGUNZIPALL: TDLGUNZIPALL Tag = 1 Left = 221 Top = 263 HelpContext = 160 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Unpack files' ClientHeight = 139 ClientWidth = 348 Font.Color = clBtnText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Prompt: TLabel Tag = 2 Left = 4 Top = 5 Width = 341 Height = 16 AutoSize = False Caption = 'Unpack file to:' end object Filestounpack: TLabel Tag = 3 Left = 4 Top = 51 Width = 129 Height = 16 AutoSize = False Caption = '&Files to unpack:' FocusControl = FileList end object UnzipText: TEdit Left = 4 Top = 26 Width = 340 Height = 21 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnKeyDown = UnzipTextKeyDown end object FileList: TEdit Left = 134 Top = 49 Width = 210 Height = 21 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 Text = '*.*' OnKeyDown = UnzipTextKeyDown end object Pathextract: TCheckBox Tag = 4 Left = 4 Top = 73 Width = 341 Height = 16 Caption = '&Unpack path names if stored with files' TabOrder = 2 OnKeyDown = UnzipTextKeyDown end object Overwrite: TCheckBox Tag = 5 Left = 4 Top = 92 Width = 341 Height = 16 Caption = '&Overwrite existing files' TabOrder = 3 OnKeyDown = UnzipTextKeyDown end object Ok: TButton Tag = 4001 Left = 35 Top = 113 Width = 90 Height = 23 Caption = 'Ok' Default = True ModalResult = 1 TabOrder = 4 OnKeyDown = UnzipTextKeyDown end object id_calltree: TButton Tag = 6 Left = 129 Top = 113 Width = 90 Height = 23 Caption = '&Tree' TabOrder = 5 OnClick = id_calltreeClick OnKeyDown = UnzipTextKeyDown end object Cancel: TButton Tag = 4002 Left = 223 Top = 113 Width = 90 Height = 23 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 6 OnKeyDown = UnzipTextKeyDown end object Translate1: TTranslate Tag = 5460 Top = 112 end object ResolutionFix1: TResolutionFix Left = 320 Top = 112 end end