1object CleanDirectoryDialog: TCleanDirectoryDialog
2  Left = 307
3  Height = 387
4  Top = 209
5  Width = 583
6  BorderIcons = [biSystemMenu]
7  Caption = 'Clean Directory'
8  ClientHeight = 387
9  ClientWidth = 583
10  OnCreate = CleanDirectoryDialogCreate
11  OnDestroy = FormDestroy
12  Position = poScreenCenter
13  LCLVersion = '1.9.0.0'
14  object DirGroupbox: TGroupBox
15    Left = 6
16    Height = 100
17    Top = 6
18    Width = 571
19    Align = alTop
20    BorderSpacing.Around = 6
21    Caption = 'Directory'
22    ClientHeight = 80
23    ClientWidth = 567
24    TabOrder = 0
25    object DirCombobox: TComboBox
26      AnchorSideRight.Control = DirBrowseButton
27      Left = 6
28      Height = 23
29      Top = 6
30      Width = 525
31      Anchors = [akTop, akLeft, akRight]
32      AutoCompleteText = [cbactSearchAscending]
33      BorderSpacing.Around = 6
34      ItemHeight = 15
35      TabOrder = 0
36      Text = 'DirCombobox'
37    end
38    object SubDirsCheckbox: TCheckBox
39      AnchorSideTop.Control = DirCombobox
40      AnchorSideTop.Side = asrBottom
41      Left = 6
42      Height = 19
43      Top = 35
44      Width = 130
45      BorderSpacing.Around = 6
46      Caption = 'Clean sub directories'
47      TabOrder = 2
48    end
49    object DirBrowseButton: TButton
50      AnchorSideLeft.Control = DirCombobox
51      AnchorSideLeft.Side = asrBottom
52      AnchorSideTop.Control = DirCombobox
53      AnchorSideRight.Control = DirGroupbox
54      AnchorSideRight.Side = asrBottom
55      AnchorSideBottom.Control = DirCombobox
56      AnchorSideBottom.Side = asrBottom
57      Left = 537
58      Height = 23
59      Top = 6
60      Width = 25
61      Anchors = [akTop, akRight, akBottom]
62      BorderSpacing.Right = 5
63      Caption = '...'
64      OnClick = DirBrowseButtonClick
65      TabOrder = 1
66    end
67  end
68  object RemoveGroupbox: TGroupBox
69    Left = 6
70    Height = 100
71    Top = 112
72    Width = 571
73    Align = alTop
74    BorderSpacing.Around = 6
75    Caption = 'Remove files matching filter:'
76    ClientHeight = 80
77    ClientWidth = 567
78    TabOrder = 1
79    object RemoveCombobox: TComboBox
80      Left = 6
81      Height = 23
82      Top = 6
83      Width = 555
84      Align = alTop
85      AutoCompleteText = [cbactSearchAscending]
86      BorderSpacing.Around = 6
87      ItemHeight = 15
88      TabOrder = 0
89      Text = 'RemoveCombobox'
90    end
91    object SimpleSyntaxRemoveCheckbox: TCheckBox
92      Left = 6
93      Height = 19
94      Top = 35
95      Width = 555
96      Align = alTop
97      BorderSpacing.Around = 6
98      Caption = 'Simple syntax (e.g. * instead of .*)'
99      TabOrder = 1
100    end
101  end
102  object KeepGroupbox: TGroupBox
103    Left = 6
104    Height = 131
105    Top = 218
106    Width = 571
107    Align = alClient
108    BorderSpacing.Around = 6
109    Caption = 'Keep files matching filter:'
110    ClientHeight = 111
111    ClientWidth = 567
112    TabOrder = 2
113    object KeepCombobox: TComboBox
114      Left = 6
115      Height = 23
116      Top = 6
117      Width = 555
118      Align = alTop
119      AutoCompleteText = [cbactSearchAscending]
120      BorderSpacing.Around = 6
121      ItemHeight = 15
122      TabOrder = 0
123      Text = 'KeepCombobox'
124    end
125    object SimpleSyntaxKeepCheckbox: TCheckBox
126      Left = 6
127      Height = 19
128      Top = 35
129      Width = 555
130      Align = alTop
131      BorderSpacing.Around = 6
132      Caption = 'Simple syntax (e.g. * instead of .*)'
133      TabOrder = 1
134    end
135    object KeepTextFilesCheckbox: TCheckBox
136      Left = 6
137      Height = 19
138      Top = 60
139      Width = 555
140      Align = alTop
141      BorderSpacing.Around = 6
142      Caption = 'Keep Text Files'
143      TabOrder = 2
144    end
145  end
146  object ButtonPanel: TButtonPanel
147    Left = 6
148    Height = 26
149    Top = 355
150    Width = 571
151    OKButton.Name = 'OKButton'
152    OKButton.DefaultCaption = True
153    HelpButton.Name = 'HelpButton'
154    HelpButton.DefaultCaption = True
155    CloseButton.Name = 'CloseButton'
156    CloseButton.DefaultCaption = True
157    CloseButton.Enabled = False
158    CancelButton.Name = 'CancelButton'
159    CancelButton.DefaultCaption = True
160    TabOrder = 3
161    ShowButtons = [pbOK, pbCancel, pbHelp]
162    ShowBevel = False
163  end
164end
165