Source position: TplFileSearchUnit.pas line 42
type TplFindFileEvent = procedure(
fullpath: string;
info: TSearchRec
) of object;