Форум программистов
 
Регистрация на форуме тут, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Как купить рекламу на форуме


Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме 20000 рублей в месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.11.2009, 19:40   #1
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию как послать http-запрос?

Здравствуйте, уважаемые!
Дано: есть программа без формы (код прямо в .dpr файле, .pas нету).
Подскажите, как послать http-запрос серверу (желательно методом POST, но если это "ректально", то пойдёт и простой, методом GET)?

Заранее благодарен!
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}
Johnson вне форума Ответить с цитированием
Старый 06.11.2009, 09:58   #2
Usov
Форумчанин
 
Аватар для Usov
 
Регистрация: 29.09.2009
Сообщений: 228
По умолчанию

так же как и с формой, только компоненты не кладешь на форму а создаешь динамически.
в uses объяви idHttp и вот пример:
Код:
function GetHTTP(AURL: String; AParams: TStringList, AGet: Boolean = True): String;
var
  idHTTP: TidHTTP;
begin
  idHTTP := TidHTTP.Create;
  try 
    if AGet then
       Result := idHTTP.Get(AURL)
    else
       Result := idHTTP.Post(AURL, Aparams);
  except
  end;
  idHTTP.Free;
end;
код писал без проверки в делфи.

Последний раз редактировалось Usov; 06.11.2009 в 10:06.
Usov вне форума Ответить с цитированием
Старый 06.11.2009, 13:28   #3
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию

уже разобрался, как динамически создавать компоненты из прошлого вопроса) Но всеравно спасибо за старания!
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}
Johnson вне форума Ответить с цитированием
Ответ
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как послать текст в RichEdit? TwiX Общие вопросы Delphi 5 29.07.2009 17:02
http-запрос Черничный Работа с сетью в Delphi 1 22.08.2008 09:57
Получение строки через HTTP запрос Никки JavaScript, Ajax 6 24.04.2008 16:56
Как послать команду AngelOfDeath Работа с сетью в Delphi 2 10.04.2008 07:23


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS