Source position: mserichstring.pas line 194
procedure setselected1(
var text: richstringty;
start: halfinteger;
len: halfinteger
);