procedure DoTagEvent(Tag: TTag; const TagString: string; TagParams: TStrings; var ReplaceText: string); override;

virtual __fastcall DoTagEvent(TTag Tag, const AnsiString TagString, TStrings TagParams, AnsiString ReplaceText);