Из юникода в русские сивмолы

Basketbol
Дата: 03.11.2019 11:03:02
Добрый день!
Есть строка
str := 'some text in english //\u0421\u0435\u043b\u0435\u043a some other text'

Т.е. коды юникода в перемешку с латиницей.
Эта строка мне приходит от сервера, который пакует структуры данных в JSON функцией
TJSON.Stringify

Мне нужно возвернуть все необходимые символы на русские буквы.
Есть какой то простой способ?
Гугл показывал tencoding.UTF8.getBytes
Но я не понял как ей пользоваться.

Или все таки писать функцию replace самому?
alekcvp
Дата: 03.11.2019 11:59:26
Basketbol,

Странно вы в гугле искали, первая же ссылка:

uses
 DBXJSON;

const
JsonUt8  ='"\u041f\u043e\u0438\u0441\u043a \u043f\u043e \u0444\u0430\u043c\u0438\u043b\u0438\u0438, \u0438\u043c\u0435\u043d\u0438 (\u043e\u0442\u0447\u0435\u0441\u0442\u0432\u0443"';

procedure TForm59.Button1Click(Sender: TObject);
var
  LJSONValue: TJSONValue;
begin
  LJSONValue:=TJSONObject.ParseJSONValue(TEncoding.UTF8.GetBytes(JsonUt8),0);
  Edit1.Text:=LJSONValue.ToString;
end;
Basketbol
Дата: 03.11.2019 12:19:24
alekcvp,

Спасибо.
Я этот код видел, и он у меня не заработал.
Сейчас копнул ближе - нужно в uses добавить System.JSON
(для Delphi Tokyo)
X11
Дата: 03.11.2019 17:41:27