Class

Module

Last Modified

Comments

The TPatternSearcher class is the real "engine" in this application.
It quickly searches for strings in many files.

Scope

Inherits from

Declaration

TPatternSearcher = class
private
  FStartDir : string;
  FPattern : string;
  FIncludeSubFolders : boolean;
  FListAllSearchedFiles : boolean;
  FCaseSensitive : boolean;

  FSearchedFiles : TSearchedFilesSet;

  FLog : TStrings;
  FSearchInfo : TList;

  FNumMatches : integer;
  FNumFilesSearched : integer;
  FNumFilesMatches : integer;

  FLenPattern : integer;

  FilePaths : TStringList;
  SL : TStringList;

  FEvaluation : boolean;

private
  procedure SearchWithPos(const Path : string); // searches with Pos (intf)
  procedure SearchWithUC(const Path : string);
public
  constructor Create(const StartDir, Pattern : string;
    IncludeSubFolders, ListAllSearchedFiles, CaseSensitive : boolean; 
    SearchedFiles : TSearchedFilesSet; Log : TStrings;
    SearchInfo : TList; AnEvaluation : boolean);

  destructor Destroy; override;
  procedure Search;
end;

Class Hierarchy

Class Fields

Name	Type	Scope	Comments
FCaseSensitive	Boolean	Private	-
FEvaluation	Boolean	Private	-
FilePaths	TStringList	Private	-
FIncludeSubFolders	Boolean	Private	-
FLenPattern	Integer	Private	-
FListAllSearchedFiles	Boolean	Private	-
FLog	TStrings	Private	-
FNumFilesMatches	Integer	Private	-
FNumFilesSearched	Integer	Private	-
FNumMatches	Integer	Private	-
FPattern	String	Private	-
FSearchedFiles	TSearchedFilesSet	Private	-
FSearchInfo	TList	Private	-
FStartDir	String	Private	-
SL	TStringList	Private	-

Constructors

Name	Declaration	Scope	Comments
Create	constructor Create(const StartDir, Pattern : string; IncludeSubFolders, ListAllSearchedFiles, CaseSensitive : boolean; SearchedFiles : TSearchedFilesSet; Log : TStrings; SearchInfo : TList; AnEvaluation : boolean);	Public	-

Destructors

Name	Declaration	Scope	Comments
Destroy	destructor Destroy; override;	Public	-

Methods

Name	Declaration	Scope	Comments
Search	procedure Search;	Public	Main search method, calls SearchWithPos or SearchWithUC
SearchWithPos	procedure SearchWithPos(const Path : string); // searches with Pos (intf)	Private	Searches with Pos (intf) case-sensitive search method
SearchWithUC	procedure SearchWithUC(const Path : string);	Private	Not case-sensitive search method

Referenced By (2)