Есть функция в новых версиях Delphi, типа:

var
 my: TMy;
 sJsonText: string;
begin
 ...
 my := TJson.JsonToObject<TMy>(sJsonText);

Я не понял - как обеспечить проверку, что Json объект корректно один в один соответствует Delphi объекту? По сути 2 задачи:

1) если в sJsonText есть поля, которые не описаны в Delphi объекте - узнать об этом
2) если в Delphi объекте остались незаполненные поля (которых нету в Json объекте, но есть в Delphi) - узнать об этом.

А так по сути на любой объект можно применить любой корректный Json объект, а толку?

Embarcadero Technologies does not currently have any additional information. Please help us document this topic by using the Discussion page!
http://docwiki.embarcadero.com/Libraries/Tokyo/en/REST.Json.TJson.JsonToObject

Надежнее руками, наверное..

Взять какой-нить unit uLkJSON; и по индексам получать имена, сравнивать с полями, запоминать что "вышло"..

..вот этими добрыми руками..

все так и будет.
json хорош и красив в скриптовых языках.
а в компилируемых со строгой типизацией его реализации чудовищны и уродливы.