delphi - 如何将 AnsiString 转换为 TBytes，反之亦然？

Question

我有一个 AnsiString我需要以最有效的方式将其转换为 TBytes .我怎样才能做到这一点 ？

Answer 1

函数BytesOf将 AnsiString 转换为 TBytes。

var
  A: AnsiString;
  B: TBytes;
begin
  A := 'Test';
  B := BytesOf(A);

  // convert it back
  SetString(A, PAnsiChar(B), Length(B));
end;