![]() |
|
#1
|
|||
|
|||
![]() Народ, помогите плиз получить сообщения из чата http://tophope.ru/chat/
получить могу, но только последнее и свое, как получать все сообщения от всех пользователей Отправка происходит так Код:
POST2:=TStringStream.Create(''); POST2.WriteString('sidebar=0'); POST2.WriteString('&lastrefresh=123631'); POST2.WriteString('&_xfRequestUri=/chat/'); POST2.WriteString('&_xfNoRedirect=1'); POST2.WriteString('&_xfToken='+xfToken); POST2.WriteString('&_xfResponseType=json'); HTTP.Document.LoadFromStream(POST2); HTTP.HTTPMethod('POST','http://tophope.ru/taigachat/list.json'); HTTP.Document.SaveToStream(Answer); Form1.Memo2.Text:=Utf8ToAnsi(Answer.DataString); |