Source position: uPSC_strutils.pas line 184
procedure RemoveTrailingChars(
var S: string;
const CSet: TSysCharSet
);