1object LazFindInFilesDialog: TLazFindInFilesDialog 2 Left = 408 3 Height = 472 4 Top = 154 5 Width = 461 6 ActiveControl = TextToFindComboBox 7 AutoSize = True 8 Caption = 'Find in files' 9 ClientHeight = 472 10 ClientWidth = 461 11 Constraints.MinHeight = 430 12 Constraints.MinWidth = 400 13 OnClose = FormClose 14 OnCreate = FormCreate 15 OnShow = FormShow 16 LCLVersion = '2.1.0.0' 17 object OptionsCheckGroupBox: TCheckGroup 18 AnchorSideLeft.Control = Owner 19 AnchorSideTop.Control = ReplaceTextComboBox 20 AnchorSideTop.Side = asrBottom 21 AnchorSideRight.Control = Owner 22 AnchorSideRight.Side = asrBottom 23 Left = 6 24 Height = 92 25 Top = 82 26 Width = 449 27 Anchors = [akTop, akLeft, akRight] 28 AutoFill = True 29 AutoSize = True 30 BorderSpacing.Around = 6 31 Caption = 'Options' 32 ChildSizing.LeftRightSpacing = 6 33 ChildSizing.TopBottomSpacing = 6 34 ChildSizing.HorizontalSpacing = 6 35 ChildSizing.VerticalSpacing = 6 36 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize 37 ChildSizing.EnlargeVertical = crsHomogenousChildResize 38 ChildSizing.ShrinkHorizontal = crsScaleChilds 39 ChildSizing.ShrinkVertical = crsScaleChilds 40 ChildSizing.Layout = cclLeftToRightThenTopToBottom 41 ChildSizing.ControlsPerLine = 2 42 ClientHeight = 62 43 ClientWidth = 445 44 Columns = 2 45 Items.Strings = ( 46 'Case sensitive' 47 'Whole words only' 48 'Regular expressions' 49 'Multi Line' 50 ) 51 TabOrder = 3 52 Data = { 53 0400000002020202 54 } 55 end 56 object WhereRadioGroup: TRadioGroup 57 AnchorSideLeft.Control = Owner 58 AnchorSideTop.Control = OptionsCheckGroupBox 59 AnchorSideTop.Side = asrBottom 60 AnchorSideRight.Control = Owner 61 AnchorSideRight.Side = asrBottom 62 Left = 6 63 Height = 92 64 Top = 180 65 Width = 449 66 Anchors = [akTop, akLeft, akRight] 67 AutoFill = True 68 AutoSize = True 69 BorderSpacing.Around = 6 70 Caption = 'Where' 71 ChildSizing.LeftRightSpacing = 6 72 ChildSizing.TopBottomSpacing = 6 73 ChildSizing.HorizontalSpacing = 6 74 ChildSizing.VerticalSpacing = 6 75 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize 76 ChildSizing.EnlargeVertical = crsHomogenousChildResize 77 ChildSizing.ShrinkHorizontal = crsScaleChilds 78 ChildSizing.ShrinkVertical = crsScaleChilds 79 ChildSizing.Layout = cclLeftToRightThenTopToBottom 80 ChildSizing.ControlsPerLine = 2 81 ClientHeight = 62 82 ClientWidth = 445 83 Columns = 2 84 ItemIndex = 1 85 Items.Strings = ( 86 'search all in project' 87 'search all editor files' 88 'search in directories' 89 'search in active file' 90 ) 91 OnClick = WhereRadioGroupClick 92 TabOrder = 4 93 end 94 object DirectoriesOptionsGroupBox: TGroupBox 95 AnchorSideLeft.Control = Owner 96 AnchorSideTop.Control = WhereRadioGroup 97 AnchorSideTop.Side = asrBottom 98 AnchorSideRight.Control = Owner 99 AnchorSideRight.Side = asrBottom 100 Left = 6 101 Height = 145 102 Top = 278 103 Width = 449 104 Anchors = [akTop, akLeft, akRight] 105 AutoSize = True 106 BorderSpacing.Around = 6 107 Caption = 'Directories' 108 ClientHeight = 115 109 ClientWidth = 445 110 Enabled = False 111 TabOrder = 5 112 object DirectoriesLabel: TLabel 113 AnchorSideLeft.Control = DirectoriesOptionsGroupBox 114 AnchorSideTop.Control = DirectoriesComboBox 115 AnchorSideTop.Side = asrCenter 116 Left = 6 117 Height = 18 118 Top = 13 119 Width = 70 120 BorderSpacing.Left = 6 121 Caption = 'Directories:' 122 FocusControl = DirectoriesComboBox 123 ParentColor = False 124 end 125 object FileMaskLabel: TLabel 126 AnchorSideLeft.Control = DirectoriesOptionsGroupBox 127 AnchorSideTop.Control = DirectoriesComboBox 128 AnchorSideTop.Side = asrBottom 129 Left = 6 130 Height = 18 131 Top = 50 132 Width = 57 133 BorderSpacing.Left = 6 134 BorderSpacing.Top = 12 135 Caption = 'File mask' 136 FocusControl = FileMaskComboBox 137 ParentColor = False 138 end 139 object DirectoriesComboBox: TComboBox 140 AnchorSideLeft.Control = DirectoriesLabel 141 AnchorSideLeft.Side = asrBottom 142 AnchorSideTop.Control = DirectoriesOptionsGroupBox 143 AnchorSideRight.Control = DirectoriesBrowse 144 Left = 82 145 Height = 32 146 Top = 6 147 Width = 318 148 Anchors = [akTop, akLeft, akRight] 149 BorderSpacing.Left = 6 150 BorderSpacing.Top = 6 151 BorderSpacing.Right = 6 152 ItemHeight = 24 153 ParentShowHint = False 154 ShowHint = True 155 TabOrder = 0 156 end 157 object DirectoriesBrowse: TBitBtn 158 AnchorSideLeft.Side = asrBottom 159 AnchorSideTop.Control = DirectoriesComboBox 160 AnchorSideRight.Control = DirectoriesOptionsGroupBox 161 AnchorSideRight.Side = asrBottom 162 AnchorSideBottom.Control = DirectoriesComboBox 163 AnchorSideBottom.Side = asrBottom 164 Left = 406 165 Height = 32 166 Top = 6 167 Width = 33 168 Anchors = [akTop, akRight, akBottom] 169 BorderSpacing.Right = 6 170 Caption = '...' 171 Layout = blGlyphTop 172 OnClick = DirectoriesBrowseClick 173 TabOrder = 1 174 end 175 object FileMaskComboBox: TComboBox 176 AnchorSideLeft.Control = FileMaskLabel 177 AnchorSideLeft.Side = asrBottom 178 AnchorSideTop.Control = FileMaskLabel 179 AnchorSideTop.Side = asrCenter 180 AnchorSideRight.Control = DirectoriesComboBox 181 AnchorSideRight.Side = asrBottom 182 Left = 69 183 Height = 32 184 Top = 43 185 Width = 331 186 Anchors = [akTop, akLeft, akRight] 187 BorderSpacing.Left = 6 188 ItemHeight = 24 189 TabOrder = 2 190 Text = '*.pas;*.pp;*.inc' 191 end 192 object IncludeSubDirsCheckBox: TCheckBox 193 AnchorSideLeft.Control = DirectoriesOptionsGroupBox 194 AnchorSideTop.Control = FileMaskComboBox 195 AnchorSideTop.Side = asrBottom 196 Left = 6 197 Height = 22 198 Top = 87 199 Width = 168 200 BorderSpacing.Left = 6 201 BorderSpacing.Top = 12 202 BorderSpacing.Bottom = 6 203 Caption = 'Include sub directories' 204 Checked = True 205 State = cbChecked 206 TabOrder = 3 207 end 208 end 209 object ButtonPanel1: TButtonPanel 210 Left = 6 211 Height = 29 212 Top = 437 213 Width = 449 214 OKButton.Name = 'OKButton' 215 OKButton.DefaultCaption = True 216 OKButton.OnClick = OKButtonClick 217 HelpButton.Name = 'HelpButton' 218 HelpButton.DefaultCaption = True 219 HelpButton.OnClick = HelpButtonClick 220 CloseButton.Name = 'CloseButton' 221 CloseButton.DefaultCaption = True 222 CloseButton.Enabled = False 223 CancelButton.Name = 'CancelButton' 224 CancelButton.DefaultCaption = True 225 TabOrder = 6 226 ShowButtons = [pbOK, pbCancel, pbHelp] 227 ShowBevel = False 228 end 229 object ReplaceTextComboBox: TComboBox 230 AnchorSideLeft.Control = ReplaceCheckBox 231 AnchorSideLeft.Side = asrBottom 232 AnchorSideTop.Control = TextToFindComboBox 233 AnchorSideTop.Side = asrBottom 234 AnchorSideRight.Control = Owner 235 AnchorSideRight.Side = asrBottom 236 Left = 88 237 Height = 32 238 Top = 44 239 Width = 367 240 Anchors = [akTop, akLeft, akRight] 241 AutoComplete = True 242 AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending] 243 BorderSpacing.Left = 6 244 BorderSpacing.Top = 6 245 BorderSpacing.Right = 6 246 BorderSpacing.Bottom = 6 247 Enabled = False 248 ItemHeight = 24 249 TabOrder = 2 250 end 251 object ReplaceCheckBox: TCheckBox 252 AnchorSideLeft.Control = Owner 253 AnchorSideTop.Control = ReplaceTextComboBox 254 AnchorSideTop.Side = asrCenter 255 Left = 6 256 Height = 22 257 Top = 49 258 Width = 76 259 BorderSpacing.Left = 6 260 Caption = 'Replace' 261 Enabled = False 262 OnChange = ReplaceCheckBoxChange 263 TabOrder = 1 264 end 265 object TextToFindLabel: TLabel 266 AnchorSideLeft.Control = Owner 267 AnchorSideTop.Control = TextToFindComboBox 268 AnchorSideTop.Side = asrCenter 269 Left = 6 270 Height = 18 271 Top = 13 272 Width = 76 273 BorderSpacing.Left = 6 274 Caption = 'Text To Find:' 275 FocusControl = TextToFindComboBox 276 ParentColor = False 277 end 278 object TextToFindComboBox: TComboBox 279 AnchorSideLeft.Control = TextToFindLabel 280 AnchorSideLeft.Side = asrBottom 281 AnchorSideTop.Control = Owner 282 AnchorSideRight.Control = Owner 283 AnchorSideRight.Side = asrBottom 284 Left = 88 285 Height = 32 286 Top = 6 287 Width = 367 288 Anchors = [akTop, akLeft, akRight] 289 AutoComplete = True 290 AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending] 291 BorderSpacing.Left = 6 292 BorderSpacing.Top = 6 293 BorderSpacing.Right = 6 294 ItemHeight = 24 295 TabOrder = 0 296 end 297 object SelectDirectoryDialog: TSelectDirectoryDialog 298 FilterIndex = 0 299 Options = [ofFileMustExist, ofEnableSizing, ofViewDetail] 300 Left = 180 301 Top = 70 302 end 303end 304