delphi - 使用特定字符集修剪字符串

Question

Delphi中有没有相当于Cocoa的stringByTrimmingCharactersInSet的函数？

我需要的是消除在字符串开头或结尾找到的字符集中包含的所有字符。字符串可以没有、可以有一个或多个开头或结尾...

在 Delphi 中执行此操作的最有效方法是什么？

Answer 1

据我所知，不存在这样的 RTL 函数。但你可以查看JclStrings JCL project的单位部分，其中包括StrTrimCharsLeft和 StrTrimCharsRight功能。

function StrTrimCharsLeft(const S: string; const Chars: TCharValidator): string; overload;
function StrTrimCharsLeft(const S: string; const Chars: array of Char): string; overload;
function StrTrimCharRight(const S: string; C: Char): string;
function StrTrimCharsRight(const S: string; const Chars: TCharValidator): string; overload;
function StrTrimCharsRight(const S: string; const Chars: array of Char): string; overload;