delphi - 如何正确解码 Google Translate API 答案？

Question

我正在与 Google Translate API 进行通信。我可以发送我的请求并得到答复。唯一的问题是一些特殊字符被编码。例如:

“时钟”(英语)将翻译为“L'horloge”(法语)

API 将向我发送此文本 L\u0026#39;horloge。如何将此类情况转换为 unicode 字符串？

Answer 1

它是 JSON unicode 和 HTML 编码。

我建议你使用 super 对象来解码 JSON: http://code.google.com/p/superobject/source/browse/#svn/trunk

uses msxml, HTTPapp, superobject;
var
  xml: IXMLHTTPRequest;
begin
  xml := CoXMLHTTP.Create;
  xml.open('GET', 'http://www.googleapis.com/language/translate/v2?  key=YOURAPIKEYHERE&q=The%20clock&source=en&target=fr', False, EmptyParam, EmptyParam);
  xml.send('');
  Caption := HTMLDecode(SO(xml.responseText)  ['data.translations[0].translatedText'].AsString);
end;