Delphi中利用SuperObject解析JSON 0.00数字有问题
procedure TForm1.btn1Click(Sender: TObject);
var
objJO,objJOTemp:ISuperObject;
s:string;
begin
objJO:=SO('{"cg":0,"cm":0.01,"ca":0.00}');
s:=objJO.AsJSon(false,false); //什么 这个转出来的时候 字符串 "ca":0A
// 因为解出来的的ca:0A
//所以objJOTemp:=SO(s)的时候,创建SuperObject失败
//发现0. 0.0 0.00貌似都会有问题
end;
[解决办法]
我这边s的值为
{"cm":0.01,"cg":0,"ca":0}
ps:
superobject版本v1.2