object DLGUNZIP: TDLGUNZIP Tag = 1 Left = 221 Top = 114 HelpContext = 160 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Unpack files' ClientHeight = 121 ClientWidth = 348 Font.Color = clBtnText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnKeyDown = UnzipTextKeyDown 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 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 PathExtract: TCheckBox Tag = 3 Left = 4 Top = 51 Width = 341 Height = 16 Caption = '&Unpack path names if stored with files' TabOrder = 1 OnKeyDown = UnzipTextKeyDown end object Overwrite: TCheckBox Tag = 4 Left = 4 Top = 70 Width = 341 Height = 16 Caption = '&Overwrite existing files' TabOrder = 2 OnKeyDown = UnzipTextKeyDown end object Ok: TButton Tag = 4001 Left = 35 Top = 94 Width = 90 Height = 23 Caption = 'Ok' Default = True ModalResult = 1 TabOrder = 3 OnKeyDown = UnzipTextKeyDown end object id_calltree: TButton Tag = 5 Left = 129 Top = 94 Width = 90 Height = 23 Caption = '&Tree' TabOrder = 4 OnClick = id_calltreeClick end object Cancel: TButton Tag = 4002 Left = 223 Top = 94 Width = 90 Height = 23 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 5 OnKeyDown = UnzipTextKeyDown end object Translate1: TTranslate Tag = 5440 Top = 92 end object ResolutionFix1: TResolutionFix Left = 316 Top = 92 end end