Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   forum.boolean.name > Программирование игр для мобильных телефонов > MidletPascal > Основной форум

Основной форум Сюда все проблемы связанные с программированием.

Ответ
 
Опции темы
Старый 06.05.2012, 01:19   #1
kalexi
AnyKey`щик
 
Регистрация: 29.07.2009
Сообщений: 3
Написано 0 полезных сообщений
(для 0 пользователей)
setHttpMethod не устанавливает метод на POST

устанавливаю setHttpMethod(connect, POST); - все равно отправляет GET
Проверил сниффером.

Код:

var
  htmlbody, resp:String;
  connect:http;
  i:Integer;
begin
  htmlbody := '...'; // Тут был большой блок с данными

  if not openHttp(connect,
    'http://transport.orgp.spb.ru/Portal/transport/stop/1282/arriving/') then
  begin
    drawText('Error1', 0, 0);
    repaint;
    delay(2000);
    halt;
  end;

  setHttpMethod(connect, POST);

  addHttpHeader(connect, 'User-Agent', 'Mozilla/5.0 (Windows NT 6.1; rv:12.0) Gecko/20100101 Firefox/12.0');
  addHttpHeader(connect, 'Accept', 'application/json, text/javascript, */*; q=0.01');
  addHttpHeader(connect, 'Accept-Language', 'ru-ru,ru;q=0.8,en-us;q=0.5,en;q=0.3');
  addHttpHeader(connect, 'Connection', 'keep-alive');
  addHttpHeader(connect, 'Content-Type', 'application/x-www-form-urlencoded; charset=UTF-8');
  addHttpHeader(connect, 'X-Requested-With', 'XMLHttpRequest');
  addHttpHeader(connect, 'Referer', 'http://transport.orgp.spb.ru/Portal/transport/stop/1282');
  addHttpHeader(connect, 'Pragma', 'no-cache');
  addHttpHeader(connect, 'Content-Length', integertoString(length(htmlbody)));
  addHttpBody(connect, htmlbody);


 
  if sendHttpMessage(connect) <> 200 then halt;
  resp := getHttpResponse(connect);

  closeHttp(connect);

  i := formAddString(resp);
  showForm;
  delay(5000);

  delay(2000);
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 20:49.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2023, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com