doublecmd/src/fmkdir.lfm
2026-04-20 18:55:31 +03:00

127 lines
3.1 KiB
Text

object frmMkDir: TfrmMkDir
Left = 366
Height = 125
Top = 429
Width = 350
ActiveControl = cbMkDir
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Create new directory'
ClientHeight = 125
ClientWidth = 350
Constraints.MinHeight = 50
Constraints.MinWidth = 350
KeyPreview = True
OnCreate = FormCreate
Position = poOwnerFormCenter
SessionProperties = 'cbMkDir.AutoComplete;btnAutoComplete.Down'
LCLVersion = '3.5.0.0'
object lblMakeDir: TLabel
Left = 6
Height = 15
Top = 6
Width = 338
Align = alTop
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = '&Input new directory name:'
FocusControl = cbMkDir
ParentColor = False
end
object pnlMkDir: TPanel
Left = 6
Height = 23
Top = 28
Width = 338
Align = alTop
AutoSize = True
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 3
BevelOuter = bvNone
ClientHeight = 23
ClientWidth = 338
TabOrder = 0
object cbMkDir: TComboBox
AnchorSideLeft.Control = pnlMkDir
AnchorSideTop.Control = pnlMkDir
AnchorSideRight.Control = btnAutoComplete
Left = 0
Height = 23
Top = 0
Width = 313
Anchors = [akTop, akLeft, akRight]
AutoCompleteText = [cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
BorderSpacing.Right = 2
DropDownCount = 16
ItemHeight = 15
TabOrder = 0
OnChange = cbMkDirChange
OnKeyUp = cbMkDirKeyUp
end
object btnAutoComplete: TSpeedButton
AnchorSideTop.Control = cbMkDir
AnchorSideRight.Control = pnlMkDir
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = cbMkDir
AnchorSideBottom.Side = asrBottom
Left = 315
Height = 23
Top = 0
Width = 23
AllowAllUp = True
Anchors = [akTop, akRight, akBottom]
Images = dmComData.ilButtons
ImageIndex = 2
GroupIndex = 1
OnClick = btnAutoCompleteClick
end
end
object cbExtended: TCheckBox
Left = 6
Height = 18
Top = 54
Width = 338
Align = alTop
Anchors = [akLeft]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = '&Extended syntax'
TabOrder = 1
OnChange = cbExtendedChange
end
object lblExample: TLabel
Left = 6
Height = 1
Top = 78
Width = 338
Align = alTop
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
end
object ButtonPanel: TButtonPanel
Left = 6
Height = 27
Top = 91
Width = 338
Align = alTop
BorderSpacing.Top = 6
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
ButtonOrder = boCloseOKCancel
TabOrder = 2
ShowButtons = [pbOK, pbCancel]
ShowBevel = False
end
end