Source position: mseclasses.pas line 141
type setstringeventty = procedure(
const sender: tobject;
var avalue: msestring;
var accept: Boolean
) of object;