Question

我需要创建一个在win XP（旧服务器）上运行的程序，因此必须在Delphi XE5中对其进行编程。

该程序必须将json发布到带有indy的网站上，并且在XE7下像梦一样工作，但是由于其中的国家字符，我无法使其在XE5下运行我认为是json值。

我在对象TJSONObject中创建json，在XE7下，我使用obj.tojson函数检索转义的json并将其发布到http。

.tojson函数在XE5下不存在。有人知道如何在XE5中检索相同内容（等于.tojson，而不是.tostring）并将其作为字符串返回吗？

Answer 1

我已经解决了我的问题。在Delphi XE5中，通过

从JSON中提取解码后的值

data :=obj.Get('access_token').JsonValue.Value

在Delphi XE7中，此操作由

完成

data :=obj.GetValue('access_token').ToString;