Class TFileSearch (unit JAFilFnd)

Inherits from

TComponent

Constructors


constructor Create(aOwner:TComponent);

Public declarations


Functions

destructor Destroy;

drh 4/6/98: Added destructor handler

procedure Start;


procedure ScanDir(fdirName:string;attr:word);

Protected declarations

drh 4/6/98: flag indicates we arnt searching any more


Properties

property FilesFound : TStringList


property RecurseSubFolders : boolean


property SearchFile : shortstring


property Stop : boolean

Published declarations

property Searching : boolean


Events

event OnChangeFolder : TChangeFolderEvent


event OnFileFind : TFindFileEvent


event OnFinish : TNotifyEvent


Variables

fChangeFolderEvent : TChangeFolderEvent;


fdirName : shortstring;


fFileFindEvent : TFindFileEvent;


fFilesFound : TStringList;


fFinishEvent : TNotifyEvent;


fRec : boolean;

Private declarations

fSearching : boolean;


fStop : boolean;



Constructors


constructor Create(aOwner:TComponent);

Public declarations


Functions


destructor Destroy;

drh 4/6/98: Added destructor handler


procedure Start;


procedure ScanDir(fdirName:string;attr:word);

Protected declarations

drh 4/6/98: flag indicates we arnt searching any more


Properties


property FilesFound : TStringList


property RecurseSubFolders : boolean


property SearchFile : shortstring


property Stop : boolean

Published declarations


property Searching : boolean


Events


event OnChangeFolder : TChangeFolderEvent


event OnFileFind : TFindFileEvent


event OnFinish : TNotifyEvent


Variables


fChangeFolderEvent : TChangeFolderEvent;


fdirName : shortstring;


fFileFindEvent : TFindFileEvent;


fFilesFound : TStringList;


fFinishEvent : TNotifyEvent;


fRec : boolean;

Private declarations


fSearching : boolean;


fStop : boolean;