Показать сообщение отдельно
  #2  
Старый 27.11.2014, 10:39
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

что-то вроде этого:
Код:
var
  LPost: TStringList;
begin
  LPost:=TStringList.Create;
  try
    LPost.Text:='xajax=order_load&xajaxr=1417029946128&xajaxargs[]=%3Cxjxobj%3E%3Ce%3E%3Ck%3Eevent%..........';
    IdHTTP1.Request.UserAgent:='Opera/9.80 (Windows NT 5.1) Presto/2.12.388 Version/12.17';
    IdHTTP1.Request.Accept:='text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/webp, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1';
...
    IdHTTP1.Request.RawHeaders.Add('Cookie: b=b');
...
    Memo1.Text:=UTF8Decode(IdHTTP1.Post('/ru/metals/order', LPost));
  finally
    LPost.Free;
  end;
end;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием