TntDB Namespace
TFieldSetWideTextEvent = procedure (Sender: TField; const Text: WideString) of object;
TntDB
This is type TntDB.TFieldSetWideTextEvent.