delphi中如果串的最后一个字符是逗号则去掉

可以使用 Delphi 中的字符串函数和条件语句来实现这个功能。以下是一种可能的实现方法：

function RemoveTrailingComma(const str: string): string;
begin
  if (Length(str) > 0) and (str[Length(str)] = ',') then
    Result := Copy(str, 1, Length(str) - 1)
  else
    Result := str;
end;

这个函数接受一个字符串参数 `str`，并返回一个去掉最后一个逗号后的新字符串。首先，它检查字符串长度是否大于零且最后一个字符是否为逗号。如果是，则使用 `Copy` 函数从字符串的第一个字符开始复制到倒数第二个字符，然后将结果返回。否则，返回原始字符串。