UnitQESBPCSGlobals
Declaration
TESBConvertEvent = procedure (Sender: TObject; var Text: string) of object;