Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Из юникода в русские сивмолы / 4 сообщений из 4, страница 1 из 1
03.11.2019, 11:03
    #39884719
Basketbol
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Из юникода в русские сивмолы
Добрый день!
Есть строка
Код: pascal
1.
str := 'some text in english //Селек some other text'


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

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

Или все таки писать функцию replace самому?
...
Рейтинг: 0 / 0
03.11.2019, 11:59
    #39884728
alekcvp
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Из юникода в русские сивмолы
Basketbol,

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

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
uses
 DBXJSON;

const
JsonUt8  ='"Поиск по фамилии, имени (отчеству"';

procedure TForm59.Button1Click(Sender: TObject);
var
  LJSONValue: TJSONValue;
begin
  LJSONValue:=TJSONObject.ParseJSONValue(TEncoding.UTF8.GetBytes(JsonUt8),0);
  Edit1.Text:=LJSONValue.ToString;
end;
...
Рейтинг: 0 / 0
03.11.2019, 12:19
    #39884731
Basketbol
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Из юникода в русские сивмолы
alekcvp,

Спасибо.
Я этот код видел, и он у меня не заработал.
Сейчас копнул ближе - нужно в uses добавить System.JSON
(для Delphi Tokyo)
...
Рейтинг: 0 / 0
03.11.2019, 17:41
    #39884788
X11
X11
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Из юникода в русские сивмолы
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Из юникода в русские сивмолы / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]