我需要创建一个在winXP
(旧服务器(上运行的程序,因此它必须在DelphiXE5
中编程。
该程序必须在网站上发布一个json(带有indy(,它在XE7
下像做梦一样工作,但我认为由于json值中的国家字符,我无法在XE5
下运行它。
我在对象TJSONObject
中创建json,在XE7
下,我用函数obj.tojson检索转义的json,并发布这个wi-indyhttp。
在XE5
下不存在.tojson函数。有人知道如何在XE5
中检索相同的内容(相当于.tojson,而不是.tostring(并将其作为字符串返回吗?
我已经解决了我的问题。在DelphiXE5中,通过从JSON中提取解码值
data :=obj.Get('access_token').JsonValue.Value
而在DelphiXE7中,这是由完成的
data :=obj.GetValue('access_token').ToString;