• Что бы вступить в ряды "Принятый кодер" Вам нужно:
    Написать 10 полезных сообщений или тем и Получить 10 симпатий.
    Для того кто не хочет терять время,может пожертвовать средства для поддержки сервеса, и вступить в ряды VIP на месяц, дополнительная информация в лс.

  • Пользаватели которые будут спамить, уходят в бан без предупреждения. Спам сообщения определяется администрацией и модератором.

  • Гость, Что бы Вы хотели увидеть на нашем Форуме? Изложить свои идеи и пожелания по улучшению форума Вы можете поделиться с нами здесь. ----> Перейдите сюда
  • Все пользователи не прошедшие проверку электронной почты будут заблокированы. Все вопросы с разблокировкой обращайтесь по адресу электронной почте : info@guardianelinks.com . Не пришло сообщение о проверке или о сбросе также сообщите нам.

Интернет Запросы В Delphi

Sascha Оффлайн

Sascha

Заместитель Администратора
Команда форума
Администратор
Регистрация
9 Май 2015
Сообщения
1,562
Баллы
155
В этом уроке мы поговорим о запросах в Delphi. Не забываем что это интернет запросы. Зачем они вообще нужны? С помощью запросов в интернет мы можем получать некую информацию, которая находится на сайте.

Сегодня мы рассмотрим 2 запроса:

Get запрос
Post запрос

Get запросы
Get запрос — это запрос, который не отправляет какие либо данные и параметры.
Для отправки запроса в Delphi имеются специальная вкладка компонентов: Indy Client, а самым основным компонентом служит — IdHTTP.


И так, отходим от теории и переходим к практике.
Создадим новый проект, кинем на форму Memo1 и Button1 с вкладки Standart, и IdHTTP1 с вкладки Indy Client.

Теперь нажимаем на IDHTTP1 и в Инспекторе объектов во вкладке Properties ставим галочку на Handleredirects, чтобы значение было — true.

Теперь кликаем два раза на кнопку и пишем:
Код:
Memo1.Lines.Add(IdHTTP1.Get(‘http://google.com‘));
Теперь компилируем (F9) программу, и нажимаем на нашу кнопку, куда мы писали код. Что мы наблюдаем?

В Memo1 появились символы и слова. Это исходный код страницы google.com. Из этого мы делаем вывод, что мы правильно отправили запрос и получили то что ожидалось. Так можно экспериментировать и с другими сайтами.

Post запросы
Post запрос — это практически тоже самое что и Get запрос, только он может отправлять данные и параметры заданные и указанные пользователем. Практически везде используют Post запрос, т.к он более удобен и практичен.
Код:
IdHTTP1.Post(a,’http://yandex.ru‘);
Конечно запрос так не будет работать, потому что он не создан, и не добавлены параметры. Более правильный запрос будет выглядеть так:
Код:
var
a: TStringList;
b: string;
begin
a:= TStringList.Create;
a.Add(‘параметр’);
a.Add(‘параметр’);
b:=IdHTTP1.Post(a,http://yandex.ru‘);
Ничего сложного :)
 
Вверх Снизу