As far as I know, RTL does not include such a feature. You can use regular expressions to fill in the gap:
function MyTrim(const Input: string; const TrimChars: string): string;
begin
Result := TRegEx.Replace(Input, Format('^[%s]*', [TrimChars]), '');
Result := TRegEx.Replace(Result, Format('[%s]*$', [TrimChars]), '');
end;
, , - .