![]() |
|
#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; .... |