资本字符串的第一个字母

Question

pascal中是否有语法（如大写字母）将字符串的第一个字母转换为大写字母。仅限第一个字母。

Answer 1

是;你可以使用UpCase函数（希望大多数Pascal变种都有它）。下面显示了如何使用它来大写给定S字符串中的第一个字符。

function UpCaseFirstChar(const S: string): string;
begin
  Result := S;

  if Length(Result) > 0 then
    Result[1] := UpCase(Result[1]);
end;