Перейти к содержанию
Fire Monkey от А до Я

Artem Zolotarevskiy

Пользователи
  • Постов

    1
  • Зарегистрирован

  • Посещение

Сообщения, опубликованные Artem Zolotarevskiy

  1. Здравствуйте!

    Пишу мобильное приложение на Delphi 10. Моя программа отправляет post и get запросы использую компонент THTTPClient. Скрипт на сервере принимает запросы в формате json, по этому при отправке запроса нужно обязательно указать в заголове "Content Type: application/json". Дело в том, что у меня не получается изменить Content Type. При отправке Get запроса он изменятся, а при отправке Post запроса - нет.

    Использую примерно такой код:

    procedure ThomeForm.Button1Click(Sender: TObject);
    var data: TStringList;
          H:THTTPClient;
    begin
      data := TStringList.Create;
      data.Add('{"phone":"' + HomeForm.Phone.Text + '"}');
     
      h := THTTPClient.Create;
     
      h.ContentType := 'application/json';
      h.Accept := 'application/json, text/plain, */*';
     
      log.Text := h.Post('https://site.ru/api/phone', data).ContentAsString();
    end;

    Прошу объяснить, почему такое происходит и как это исправить.

×
×
  • Создать...