Question

如何将char数组转换为字符串？

我有一个正常的字符数组，我想将其值转换为字符串。我怎么能这样做？

编辑： 最初这个问题是关于“字符串到字符串数组”的问题，但是OP接受了一个答案，上面写着“数组char，字符串”。 < / p>

Answer 1

似乎您可能在array of char中有文字。如果是这样，那么你可以这样做：

function ArrayToString(const a: array of Char): string;
begin
  if Length(a)>0 then
    SetString(Result, PChar(@a[0]), Length(a))
  else
    Result := '';
end;

另一方面，也许你问一个完全不同的问题。

Answer 2

function ArrayToString(const Data: array of string): string;
var
  SL: TStringList;
  S: string;
begin
  SL := TStringList.Create;
  try
    for S in Data do
      SL.Add(S);
    Result := SL.Text;
  finally
    SL.Free;
  end;
end;

这就是我理解你的要求。然而，大卫的解决方案可能就是你想要的。你决定了。

将Char数组转换为String？

2 个答案: