Source position: fpindexer.pp line 198
type TOnSearchWordEvent = procedure(
AReader: TCustomFileReader;
var AWord: TSearchWordData
) of object;