doublecmd/src/fextractdlg.lfm
2019-02-06 19:45:44 +00:00

227 lines
5.9 KiB
Text

inherited frmExtractDlg: TfrmExtractDlg
Left = 552
Height = 222
Top = 162
Width = 516
HelpContext = 160
HorzScrollBar.Page = 446
HorzScrollBar.Range = 437
HorzScrollBar.Visible = False
VertScrollBar.Page = 182
VertScrollBar.Range = 177
ActiveControl = edtExtractTo
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Unpack files'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ClientHeight = 222
ClientWidth = 516
OnCreate = FormCreate
Position = poOwnerFormCenter
SessionProperties = 'cbOverwrite.Checked'
inherited pnlContent: TPanel
Left = 6
Height = 148
Top = 5
Width = 500
Align = alNone
ChildSizing.TopBottomSpacing = 4
ClientHeight = 148
ClientWidth = 500
object pnlLabels: TPanel[0]
AnchorSideLeft.Control = pnlContent
AnchorSideTop.Control = cbFileMask
AnchorSideBottom.Control = edtPassword
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 140
Top = 5
Width = 166
Anchors = [akTop, akLeft, akBottom]
AutoSize = True
BevelOuter = bvNone
ClientHeight = 140
ClientWidth = 166
Color = clForm
ParentColor = False
TabOrder = 4
object lblFileMask: TLabel
AnchorSideLeft.Control = pnlLabels
AnchorSideTop.Control = pnlLabels
Left = 0
Height = 15
Top = 3
Width = 166
BorderSpacing.Top = 3
Caption = '&Extract files matching file mask:'
FocusControl = cbFileMask
ParentColor = False
end
object lblPassword: TLabel
AnchorSideLeft.Control = pnlLabels
AnchorSideBottom.Control = pnlLabels
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 15
Top = 122
Width = 151
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 3
Caption = '&Password for encrypted files:'
FocusControl = edtPassword
ParentColor = False
end
object lblExtractTo: TLabel
AnchorSideTop.Control = lblFileMask
AnchorSideTop.Side = asrBottom
Left = 0
Height = 15
Top = 26
Width = 86
BorderSpacing.Top = 8
Caption = 'To the &directory:'
FocusControl = edtExtractTo
ParentColor = False
end
end
object cbFileMask: TComboBox[1]
AnchorSideLeft.Control = pnlLabels
AnchorSideLeft.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 171
Height = 23
Top = 5
Width = 260
BorderSpacing.Left = 5
BorderSpacing.Top = 2
Constraints.MinWidth = 260
ItemHeight = 15
ParentFont = False
TabOrder = 0
Text = '*.*'
end
object edtExtractTo: TDirectoryEdit[2]
AnchorSideLeft.Control = cbFileMask
AnchorSideTop.Control = cbFileMask
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = cbFileMask
AnchorSideRight.Side = asrBottom
Left = 171
Height = 23
Top = 30
Width = 321
ShowHidden = False
ButtonWidth = 23
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 4
MaxLength = 0
TabOrder = 1
end
object edtPassword: TEdit[3]
AnchorSideLeft.Control = cbFileMask
AnchorSideTop.Control = pnlCheckBoxes
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edtExtractTo
AnchorSideRight.Side = asrBottom
Left = 171
Height = 23
Top = 122
Width = 321
Anchors = [akTop, akLeft, akRight]
EchoMode = emPassword
Enabled = False
PasswordChar = '*'
TabOrder = 3
end
object pnlCheckBoxes: TPanel[4]
AnchorSideLeft.Control = pnlContent
AnchorSideTop.Control = edtExtractTo
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 0
Height = 69
Top = 53
Width = 506
AutoSize = True
BevelOuter = bvNone
ChildSizing.TopBottomSpacing = 6
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ClientHeight = 69
ClientWidth = 506
Color = clForm
ParentColor = False
TabOrder = 2
object cbInSeparateFolder: TCheckBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 6
Width = 351
BorderSpacing.Top = 2
Caption = 'Unpack each archive to a &separate subdir (name of the archive)'
TabOrder = 0
end
object cbExtractPath: TCheckBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 25
Width = 351
Caption = '&Unpack path names if stored with files'
Checked = True
OnChange = cbExtractPathChange
State = cbChecked
TabOrder = 1
end
object cbOverwrite: TCheckBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 44
Width = 351
Caption = 'O&verwrite existing files'
Checked = True
State = cbChecked
TabOrder = 2
end
end
end
inherited pnlButtons: TPanel
AnchorSideLeft.Control = pnlContent
AnchorSideTop.Control = DividerBevel
AnchorSideRight.Control = pnlContent
AnchorSideRight.Side = asrBottom
Left = 6
Top = 176
Width = 500
Align = alNone
Anchors = [akTop, akLeft, akRight]
ClientWidth = 500
inherited btnCancel: TBitBtn
Left = 318
end
inherited btnOK: TBitBtn
Left = 412
end
end
object DividerBevel: TDividerBevel[2]
AnchorSideLeft.Control = pnlContent
AnchorSideTop.Control = pnlContent
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = pnlContent
AnchorSideRight.Side = asrBottom
Left = 6
Height = 15
Top = 157
Width = 500
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 4
Font.Style = [fsBold]
ParentFont = False
end
inherited pmQueuePopup: TPopupMenu[3]
end
end