Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Steam [Покупка]


Rakim ©   (2014-09-16 14:41:00) 

Пытаюсь послать запрос покупки предмета в Steam Market. Вроде бы весь запрос как в снифере, но выбивает ошибку : [url] http://puu.sh/bAAIk/b095f61217.png[/url]

[CODE]procedure TForm1.Button4Click(Sender: TObject);
var
data:TStringlist;
begin
http.Request.Host:='steamcommunity.com';
http.Request.Connection:='keep-alive';
http.Request.ContentLength:=68;
http.Request.Accept:='*/*';
http.Request.UserAgent:='Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/37.0.2062.103';
http.Request.ContentType:='application/x-www-form-urlencoded; charset=UTF-8';
http.Request.Referer:=' http://steamcommunity.com/market/listings/570/Bobusang%27s%20Fist%20of%20the%20Predator%20Owl';
http.Request.AcceptEncoding:='gzip,deflate';
http.Request.AcceptLanguage:='ru-RU,ru;q=0.8,en-US;q=0.6,en;q=0.4';
data:=TStringList.Create;

data.add('sessionid='+sessionid);
data.add('currency=5');
data.add('subtotal=12');
data.add('fee=2');
data.add('total=14');
HTTP.Post('https://steamcommunity.com/market/buylisting/'+Edit4.Text,data);
end;[/CODE]

Помогите :)


megavoid   (2014-09-16 15:02:00) [1]

Куку, наверное, хочет магазин


Наверх

Титульная страница Поиск, карта сайта Написать письмо