Das stimmt. Aber er muss es doch nur auf
TObject
casten und schon kann er es nach Feldern absuchen wie er es sonst auch macht.
Ich kann ja ebenso sagen
Delphi-Quellcode:
var
interfacedObj: IInterface;
begin
interfacedObj := TInnerType.Create();
marshalledObject := TJson.ObjectToJsonObject( interfacedObj as TObject );
WriteLn( marshalledObject.ToJSON() );
end.
und bekomme