object DLGUNZIPALL: TDLGUNZIPALL Tag = 1 Left = 221 Top = 263 HelpContext = 160 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Unpack files' ClientHeight = 138 ClientWidth = 356 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 = 345 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 = 347 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 = 217 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 = 345 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 = 345 Height = 16 Caption = '&Overwrite existing files' TabOrder = 3 OnKeyDown = UnzipTextKeyDown end object Ok: TButton Tag = 4001 Left = 3 Top = 113 Width = 85 Height = 23 Caption = 'Ok' Default = True ModalResult = 1 TabOrder = 4 OnKeyDown = UnzipTextKeyDown end object id_calltree: TButton Tag = 6 Left = 92 Top = 113 Width = 85 Height = 23 Caption = '&Tree' TabOrder = 5 OnClick = id_calltreeClick OnKeyDown = UnzipTextKeyDown end object Cancel: TButton Tag = 4002 Left = 180 Top = 113 Width = 85 Height = 23 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 6 OnKeyDown = UnzipTextKeyDown end object Button1: TButton Tag = 4003 Left = 269 Top = 113 Width = 85 Height = 23 Caption = 'Help' TabOrder = 7 OnClick = Button1Click OnKeyDown = UnzipTextKeyDown end object Translate1: TTranslate Tag = 5460 Top = 112 end object ResolutionFix1: TResolutionFix Left = 32 Top = 112 end end