Delphi deserialize JSON with abstract class

Question

I want to serialize and deserialize an object with the built-in functions TJson.JsonToObject and TJson.ObjectToJsonObject. The object contains