字符串的第一个字母大写

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;