使用Delphi中的StrUtils删除SQL UPDATE语句中的最后一个逗号

使用Delphi中的StrUtils删除SQL UPDATE语句中的最后一个逗号，可以使用StrUtils.Delete函数。以下是一个示例代码：

uses
  StrUtils;

function RemoveLastComma(const Input: string): string;
var
  LastCommaPos: Integer;
begin
  LastCommaPos := LastDelimiter(',', Input);
  if LastCommaPos > 0 then
    Result := Copy(Input, 1, LastCommaPos - 1) + Copy(Input, LastCommaPos + 1, Length(Input))
  else
    Result := Input;
end;

在这个示例中，我们定义了一个名为RemoveLastComma的函数，它接受一个字符串参数Input，并返回一个新的字符串，其中最后一个逗号被删除。我们使用LastDelimiter函数找到最后一个逗号的位置，然后使用Copy函数将字符串分成两部分，并将它们连接在一起，以删除最后一个逗号。

这个函数可以用于任何包含逗号的字符串，例如SQL UPDATE语句。只需将包含逗号的字符串传递给函数，它将返回一个新的字符串，其中最后一个逗号被删除。