Source position: IdDICTServer.pas line 79
type TIdDICTMatchEvent = procedure(
AContext: TIdCommand;
Database: string;
Strategy: string;
WordToFind: string
) of object;