В этом уроке мы поговорим о запросах в 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‘);
Ничего сложного :)