使用 SuperObect 更改 Json

Question

我正在使用 SuperObject 来处理 Json/Delphi 我有一个函数，它接受一个字符串并创建一个 var 超级对象类型，我需要检查它是否有一个对象（在我的例子中是“smtp”），如果没有，我创建。 问题是：“smtp”有子项，例如 smtp.address，我必须创建 smtp 及其所有子项，但我的函数不起作用。

我的代码：

if js.o['smtp'] = nil then
  js.o['smtp'].S['address']:= 'justATest';

任何人都可以帮助我吗？

我正在使用 Delphi 2007 和 SuperObject Unit

Answer 1

if js['smtp'] = nil then
  js.S['smtp.address']:= 'justATest';