delphi - 如何在 Delphi XE4 中将 AnsiString 转换为 UnicodeString

Question

exzample code:
var
  str1 : String;
  str2 : AnsiString;
  ....
  str2 := ....;
  str1 := String(str2);  

我按上面的方法转换了，但是没用。我发现 str1 中丢失了一些数据。有安全的方法可以将 AnsiString 转换为 UnicodeString 吗？

Answer 1

您的代码已经正确。它将从 ANSI 转换为 UTF-16 而不会丢失信息。

因此我得出结论，当您分配给 AnsiString 变量时，信息丢失了。换句话说，代码中的错误包含在代码的 .... 部分。

错误可能是您的 AnsiString 变量的数据和代码页不匹配。