将英镑符号从 Delphi 发送到 C# Web 服务

Question

我正在从 Delphi 5 向 C# Web 服务发送一个大字符串，但我在使用英镑 (£) 符号时遇到了很多麻烦。 我从 Delphi 端对字符串进行 URLEncode（这似乎将它们转换为“%A3”）。 当它到达 C# Web 服务时，它显示为“�”。 我尝试使用 StreamReader（如下所示）更改 C# 端字符串的编码，但我能做的最好的事情就是更改为问号 (?)。

MemoryStream mr = new MemoryStream(System.Text.Encoding.Default.GetBytes(myString));
StreamReader sr = new StreamReader(mr, System.Text.Encoding.Default);
string s = sr.ReadToEnd();

如何正确解释 £ 符号？

请帮忙！

（请求更多信息）

Web 服务签名是：

[WebMethod]
public string ReadMyString(string PostedString)

Delphi 5 代码使用我们已经成功使用多年的第三方组件/代码，但这是我们第一次尝试直接与 C# 对话。 代码概要如下所示：

 tmp_Str := URLEncode(myBigString);
 tmp_Str := WinInetPostData(myURL, tmp_Str);

在这两行之间，我已确认 £ 符号已正确转换为“%A3”。

Answer 1

根据您在您自己的答案中所写的内容< /a>，看起来问题在于客户端如何对字符串进行编码，而不是服务器如何解释它（尽管无论您使用什么编码，服务器都需要配合）。 您显然希望它被编码为 UTF-8（如果您没有指定任何其他内容，这是 StreamReader 的默认值），但如果您使用 NetMasters 库，我不会感到惊讶using 甚至不知道 UTF-8 或任何其他形式的 Unicode。

Delphi 5 可以通过其 WideString 类型很好地处理 Unicode，但它缺乏很多支持实用函数。 如果您想将代码保留在 NetMasters 中，那么最小的改变就是引入支持 Unicode 的库，例如来自免费 JCL。 在那里您可以找到一个 Utf8Encode 函数，它将接收 WideString 并返回一个 AnsiString，然后该函数适合传递给您现有的 URL 编码功能。

更好的办法是完全摆脱 NM 代码。 免费的 Indy 库 具有 UTF-8 编码和 URL 编码以及所有其他 Internet 编码的功能相关任务。

如果您不在客户端使用 Unicode，则没有理由期望“£”被编码为两字节序列 c2 a3。 这是 U+00a3 的 UTF-8 编码形式，即井号字符的代码点。

如果您没有在客户端上使用Unicode，那么您必须找出您正在使用的代码页。 然后，在创建新的 StreamReader 时在服务器上指定该编码。

Answer 2

知道了！ Delphi 中的 URLEncode 函数（使用名为 NMURL 的第三方组件）将 £ 编码为“%A3”，而实际上它应该是“%C2%A3”。 我在 Delphi 端进行了手动替换来纠正它，然后在 C# 端根本不需要任何操作。

感谢您的所有建议。 这将教会我相信旧组件！

Answer 3

我建议在 Delphi 端使用 Base64 编码（将单位 EncdDecd 添加到您的 use 子句和方法 EncodeString 中）并在 C# 端对其进行解码。

public static string DecodeString(string base64EncodedString)
  {
     byte[] dataToDecode = Convert.FromBase64String(base64EncodedString);
     string result = Encoding.ASCII.GetString(dataToDecode);
     return result;
  }

祝你好运。

Answer 4

据我所知.NET中的字符串是UTF-16，所以你可以尝试在Delphi中使用相应的Widestring < 2009。在 Delphi 2009 中，字符串默认为 UTF-16，但请确保强制执行编码。

Answer 5

来自 System.Text.Encoding.Default 的 .Net 帮助：

“获取系统当前 ANSI 代码页的编码。”

看起来 0xA3 不在该代码页中作为井号。 将其切换为UTF-8，它应该正确解码该特定字符，但我不能说这是否是整体正确的编码（是否是delphi发出的）。

您可以通过更改第一行来切换到 UTF8，如下所示：

MemoryStream mr = new MemoryStream(System.Text.Encoding.UTF8.GetBytes(myString)