Source position: mserichstring.pas line 228
procedure captiontorichstring(
const caption: captionty;
var dest: richstringty
);