Source position: strutils.pp line 272
procedure RemoveTrailingChars(
var S: AnsiString;
const CSet: TSysCharset
);procedure RemoveTrailingChars(
var S: UnicodeString;
);