anchor.diff:          begin
             Value := obj.AsString;
             Result := True;
  -        end
  +        end;
       else
         Value := nil;
         Result := False;
  
positive.code:         tkDynArray: FromDynArray;
          tkClassRef: FromClassRef;
        else
        begin
          FromUnknown;
        end
        end else
        begin
          TValue.Make(nil, TypeInfo, Value);
  
negative.code: var
    Serial: TSerialFromJson;
  begin
  
    if TypeInfo <> nil then
    begin
      if not SerialFromJson.TryGetValue(TypeInfo, Serial) then
  