lazarus/ide/cleandirdlg.lfm
wp 0125b3c239 IDE: Make edit buttons ('...') square.
git-svn-id: trunk@56964 -
2018-01-05 14:44:31 +00:00

165 lines
3.9 KiB
Plaintext

object CleanDirectoryDialog: TCleanDirectoryDialog
Left = 307
Height = 387
Top = 209
Width = 583
BorderIcons = [biSystemMenu]
Caption = 'Clean Directory'
ClientHeight = 387
ClientWidth = 583
OnCreate = CleanDirectoryDialogCreate
OnDestroy = FormDestroy
Position = poScreenCenter
LCLVersion = '1.9.0.0'
object DirGroupbox: TGroupBox
Left = 6
Height = 100
Top = 6
Width = 571
Align = alTop
BorderSpacing.Around = 6
Caption = 'Directory'
ClientHeight = 80
ClientWidth = 567
TabOrder = 0
object DirCombobox: TComboBox
AnchorSideRight.Control = DirBrowseButton
Left = 6
Height = 23
Top = 6
Width = 525
Anchors = [akTop, akLeft, akRight]
AutoCompleteText = [cbactSearchAscending]
BorderSpacing.Around = 6
ItemHeight = 15
TabOrder = 0
Text = 'DirCombobox'
end
object SubDirsCheckbox: TCheckBox
AnchorSideTop.Control = DirCombobox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 19
Top = 35
Width = 130
BorderSpacing.Around = 6
Caption = 'Clean sub directories'
TabOrder = 2
end
object DirBrowseButton: TButton
AnchorSideLeft.Control = DirCombobox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = DirCombobox
AnchorSideRight.Control = DirGroupbox
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = DirCombobox
AnchorSideBottom.Side = asrBottom
Left = 537
Height = 23
Top = 6
Width = 25
Anchors = [akTop, akRight, akBottom]
BorderSpacing.Right = 5
Caption = '...'
OnClick = DirBrowseButtonClick
TabOrder = 1
end
end
object RemoveGroupbox: TGroupBox
Left = 6
Height = 100
Top = 112
Width = 571
Align = alTop
BorderSpacing.Around = 6
Caption = 'Remove files matching filter:'
ClientHeight = 80
ClientWidth = 567
TabOrder = 1
object RemoveCombobox: TComboBox
Left = 6
Height = 23
Top = 6
Width = 555
Align = alTop
AutoCompleteText = [cbactSearchAscending]
BorderSpacing.Around = 6
ItemHeight = 15
TabOrder = 0
Text = 'RemoveCombobox'
end
object SimpleSyntaxRemoveCheckbox: TCheckBox
Left = 6
Height = 19
Top = 35
Width = 555
Align = alTop
BorderSpacing.Around = 6
Caption = 'Simple syntax (e.g. * instead of .*)'
TabOrder = 1
end
end
object KeepGroupbox: TGroupBox
Left = 6
Height = 131
Top = 218
Width = 571
Align = alClient
BorderSpacing.Around = 6
Caption = 'Keep files matching filter:'
ClientHeight = 111
ClientWidth = 567
TabOrder = 2
object KeepCombobox: TComboBox
Left = 6
Height = 23
Top = 6
Width = 555
Align = alTop
AutoCompleteText = [cbactSearchAscending]
BorderSpacing.Around = 6
ItemHeight = 15
TabOrder = 0
Text = 'KeepCombobox'
end
object SimpleSyntaxKeepCheckbox: TCheckBox
Left = 6
Height = 19
Top = 35
Width = 555
Align = alTop
BorderSpacing.Around = 6
Caption = 'Simple syntax (e.g. * instead of .*)'
TabOrder = 1
end
object KeepTextFilesCheckbox: TCheckBox
Left = 6
Height = 19
Top = 60
Width = 555
Align = alTop
BorderSpacing.Around = 6
Caption = 'Keep Text Files'
TabOrder = 2
end
end
object ButtonPanel: TButtonPanel
Left = 6
Height = 26
Top = 355
Width = 571
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CloseButton.Enabled = False
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 3
ShowButtons = [pbOK, pbCancel, pbHelp]
ShowBevel = False
end
end