![]() |
|
|
#1
|
|||
|
|||
|
Здравствуйте!)
Такая проблемка: С помощью потока авторизуюсь на сайте методом Post, компонент idHTTP, и возвращаемую строку присваиваю переменной Сервер возвращает JSON-массив Для работы с ним использую модуль uLkJSON Парсирую текст, вытаскиваю нужные мне значения в Memo и тут возникает проблема Если значение в JSON содержит русские буквы, то они отображаются как знаки вопросов Надеюсь на вашу помощь) Вот код: Код:
....
var
js:TlkJSONobject;
s: string;
nick,pass: String;
stream: TStringStream;
....
begin
js := TlkJSONobject.Create;
stream:=TStringStream.Create;
nick := Edit1.Text;
pass := Edit2.Text;
stream.WriteString('u='+nick+'&p='+pass);
s := (IdHTTP1.Post('http://.....',stream));
js := TlkJSON.ParseText(s) as TlkJSONobject;
Memo1.Lines.Add(js.getString('user_id'));
Memo1.Lines.Add((js.getString('username')));
Memo1.Lines.Add(js.getString('new_pm'));
Memo1.Lines.Add(js.getString('unread_pm'));
js.Free;
.... |