Имам няколко класа (от TObject ) в Delphi XE7 (Firemonkey), които имат свойство AsJson : uses System.Classes, System.SysUtils, XSuperObject; type TMyObject = class(TObject) public property AsJson: ISuperObject read GetAsJson; end;...