Source position: mserichstring.pas line 105
type updaterichstringeventty = procedure(
const sender: tobject;
var avalue: richstringty
) of object;