lazarus/ide/cleandirdlg.lfm
darius c86d5ec42b moved TShowDeletingFilesDialog to separate file and converted to .lfm
replaced TListbox in TShowDeletingFilesDialog by TCheckListBox
changed file delete algorithm so that only checked files are deleted, default all files are checked (previous behaviour)
implemented TButtonPanel

git-svn-id: trunk@17007 -
2008-10-15 17:53:14 +00:00

463 lines
12 KiB
Plaintext

object CleanDirectoryDialog: TCleanDirectoryDialog
Left = 307
Height = 364
Top = 209
Width = 450
HelpContext = 0
ActiveControl = DirCombobox
Align = alNone
AllowDropFiles = False
AutoScroll = True
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsSizeable
Caption = 'Clean Directory'
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 364
ClientWidth = 450
DockSite = False
DragKind = dkDrag
DragMode = dmManual
Enabled = True
Font.Height = 0
Font.Style = []
FormStyle = fsNormal
OnCreate = CleanDirectoryDialogCreate
ParentBiDiMode = True
ParentFont = False
Position = poScreenCenter
ShowInTaskBar = stDefault
UseDockManager = False
LCLVersion = '0.9.27'
WindowState = wsNormal
object DirGroupbox: TGroupBox
Left = 6
Height = 88
Top = 6
Width = 438
HelpContext = 0
Align = alTop
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'Directory'
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 69
ClientWidth = 434
Ctl3D = False
DockSite = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ParentColor = True
ParentCtl3D = False
ParentFont = True
ParentShowHint = True
TabOrder = 0
TabStop = False
Visible = True
object DirCombobox: TComboBox
AnchorSideRight.Control = DirBrowseButton
Left = 6
Height = 29
Top = 6
Width = 394
HelpContext = 0
TabStop = True
Align = alNone
Anchors = [akTop, akLeft, akRight]
ArrowKeysTraverseList = True
AutoComplete = False
AutoCompleteText = [cbactSearchAscending]
AutoDropDown = False
AutoSelect = False
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
CharCase = ecNormal
Ctl3D = False
DragCursor = crDrag
DragMode = dmManual
DropDownCount = 8
Enabled = True
ItemHeight = 0
ItemIndex = -1
ItemWidth = 0
MaxLength = 0
ParentBidiMode = True
ParentColor = False
ParentCtl3D = False
ParentFont = True
ParentShowHint = True
Sorted = False
Style = csDropDown
TabOrder = 0
Text = 'DirCombobox'
Visible = True
end
object SubDirsCheckbox: TCheckBox
AnchorSideTop.Control = DirCombobox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 22
Top = 41
Width = 422
HelpContext = 0
Align = alBottom
AllowGrayed = False
Anchors = [akTop, akLeft, akRight, akBottom]
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'Clean sub directories'
Checked = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentColor = True
ParentFont = True
ParentShowHint = True
ParentBidiMode = True
State = cbUnchecked
TabOrder = 1
TabStop = True
UseOnChange = False
Visible = True
end
object DirBrowseButton: TButton
AnchorSideLeft.Control = DirCombobox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = DirCombobox
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = DirGroupbox
AnchorSideRight.Side = asrBottom
Left = 406
Height = 21
Top = 10
Width = 23
HelpContext = 0
Align = alNone
Anchors = [akTop, akRight]
AutoSize = False
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 5
BorderSpacing.Bottom = 0
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Cancel = False
Caption = '...'
Default = False
DragCursor = crDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ModalResult = 0
OnClick = DirBrowseButtonClick
ParentFont = True
ParentShowHint = True
TabOrder = 2
TabStop = True
Visible = True
end
end
object RemoveGroupbox: TGroupBox
Left = 6
Height = 88
Top = 100
Width = 438
HelpContext = 0
Align = alTop
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'Remove files matching filter:'
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 69
ClientWidth = 434
Ctl3D = False
DockSite = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ParentColor = True
ParentCtl3D = False
ParentFont = True
ParentShowHint = True
TabOrder = 1
TabStop = False
Visible = True
object RemoveCombobox: TComboBox
Left = 6
Height = 29
Top = 6
Width = 422
HelpContext = 0
TabStop = True
Align = alTop
ArrowKeysTraverseList = True
AutoComplete = False
AutoCompleteText = [cbactSearchAscending]
AutoDropDown = False
AutoSelect = False
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
CharCase = ecNormal
Ctl3D = False
DragCursor = crDrag
DragMode = dmManual
DropDownCount = 8
Enabled = True
ItemHeight = 0
ItemIndex = -1
ItemWidth = 0
MaxLength = 0
ParentBidiMode = True
ParentColor = False
ParentCtl3D = False
ParentFont = True
ParentShowHint = True
Sorted = False
Style = csDropDown
TabOrder = 0
Text = 'RemoveCombobox'
Visible = True
end
object SimpleSyntaxRemoveCheckbox: TCheckBox
Left = 6
Height = 22
Top = 41
Width = 422
HelpContext = 0
Align = alTop
AllowGrayed = False
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'Simple syntax (e.g. * instead of .*)'
Checked = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentColor = True
ParentFont = True
ParentShowHint = True
ParentBidiMode = True
State = cbUnchecked
TabOrder = 1
TabStop = True
UseOnChange = False
Visible = True
end
end
object KeepGroupbox: TGroupBox
Left = 6
Height = 116
Top = 194
Width = 438
HelpContext = 0
Align = alClient
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'Keep files matching filter:'
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 97
ClientWidth = 434
Ctl3D = False
DockSite = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ParentColor = True
ParentCtl3D = False
ParentFont = True
ParentShowHint = True
TabOrder = 2
TabStop = False
Visible = True
object KeepCombobox: TComboBox
Left = 6
Height = 29
Top = 6
Width = 422
HelpContext = 0
TabStop = True
Align = alTop
ArrowKeysTraverseList = True
AutoComplete = False
AutoCompleteText = [cbactSearchAscending]
AutoDropDown = False
AutoSelect = False
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
CharCase = ecNormal
Ctl3D = False
DragCursor = crDrag
DragMode = dmManual
DropDownCount = 8
Enabled = True
ItemHeight = 0
ItemIndex = -1
ItemWidth = 0
MaxLength = 0
ParentBidiMode = True
ParentColor = False
ParentCtl3D = False
ParentFont = True
ParentShowHint = True
Sorted = False
Style = csDropDown
TabOrder = 0
Text = 'KeepCombobox'
Visible = True
end
object SimpleSyntaxKeepCheckbox: TCheckBox
Left = 6
Height = 22
Top = 41
Width = 422
HelpContext = 0
Align = alTop
AllowGrayed = False
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'Simple syntax (e.g. * instead of .*)'
Checked = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentColor = True
ParentFont = True
ParentShowHint = True
ParentBidiMode = True
State = cbUnchecked
TabOrder = 1
TabStop = True
UseOnChange = False
Visible = True
end
object KeepTextFilesCheckbox: TCheckBox
Left = 6
Height = 22
Top = 69
Width = 422
HelpContext = 0
Align = alTop
AllowGrayed = False
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'Keep Text Files'
Checked = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentColor = True
ParentFont = True
ParentShowHint = True
ParentBidiMode = True
State = cbUnchecked
TabOrder = 2
TabStop = True
UseOnChange = False
Visible = True
end
end
object ButtonPanel: TButtonPanel
Left = 6
Height = 48
Top = 316
Width = 438
HelpContext = 0
Align = alBottom
AutoSize = True
ButtonOrder = boDefault
TabOrder = 3
DefaultButton = pbOK
ShowButtons = [pbOK, pbCancel, pbHelp]
ShowGlyphs = [pbOK, pbCancel, pbClose, pbHelp]
Visible = True
end
end