Delphi XE7 как передать кирилицу в JSON?

Question

[maks280795]

Не получается передать кириллицу завернутую в JSON через Indy.

Что делаю:
Создаю TJSON объект с некоторыми полями на кириллице
В объект тип TIdMultiPartFormDataStream добавляю поле data где значение строковое представление объекта
Выполняю Post запрос передав ему объект типа TIdMultiPartFormDataStream.

Что получаю:
Получаю знаки вопроса на стороне сервера.
Пробовал закодировать в BASE64, но в этом случае валидатор ругается:

Comments

[Luke Vost]

А что мешает в UTF-8? Помню, тоже была такая проблема. Попробуйте функцию AnsiToUtf8();

Answer 1

[maks280795]

Проблема решена.
Суть в том, что я пытался закодировать base64 только значения ключа, теперь просто закодировал строковое представление JSON объекта и получил что хотел.