Показать сообщение отдельно
  #1  
Старый 25.01.2022, 21:05
Аватар для Admin
Admin Admin вне форума
Администратор
 
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,560
Версия Delphi: Delphi 7
Репутация: выкл
Лампочка Многоуровневый POST-запрос

Вопрос: необходимо отправить POST-запрос по примеру ниже.
Судя по всему пример в виде JSON.

Код HTML:
{ "startDate": "2022-01-01", "endDate": "2022-01-20", "dimensions": [ "QUERY" ], "dimensionFilterGroups": [ { "filters": [ { "dimension": "PAGE", "expression": "https://site.com/some-url/", "operator": "EQUALS" } ] } ] } JSON {"startDate":"2022-01-01","endDate":"2022-01-25","dimensions":["QUERY"],"dimensionFilterGroups":[{"filters":[{"expression":"sample","operator":"EQUALS"}]}]}

Если бы пример был в таком виде:

Код HTML:
{ "startDate": "2022-01-01", "endDate": "2022-01-20", }

То наверное я бы отправил его так:

Код:
  IdHTTP.Headers.Clear;
  IdHTTP.Headers.Add('Authorization: OAuth ' + Access_token);
  ListToHeaders(IdHTTP.Headers);

  PostData := TStringStream.Create;
  try
    IdHTTP.MimeType := 'application/x-www-form-urlencoded';

    PostData.WriteString('startDate=2021-12-17');
    PostData.WriteString('&endDate=2022-01-25');

    IdHTTP.Document.LoadFromStream(PostData);
    IdHTTP.HTTPMethod('POST', url);

Но с примером выше не пойму как поступить.
Нид хелп )