powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Delphi Xe7, RestClient и JSON
2 сообщений из 2, страница 1 из 1
Delphi Xe7, RestClient и JSON
    #40014576
aidynchik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем доброго дня!
Имеется вот такой простой код, отправляю POST-запрос на https://postman-echo.com/post. Данный сервис, просто ответом мне высылает все, что я ему отправляю.
В заголовке указываю параметры "username : devtest90@mail.ru", так вот почему-то devtest90@mail.ru превращается в devtest90%40mail.ru. Как этого избежать?

Ниже привел свой код и ответ от https://postman-echo.com

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
o.AddPair('key', 'value');

    try
      RESTClient.BaseURL := edtAddress.Text;
      RESTRequest.Params.AddHeader('username', 'devtest90@mail.ru');
      RESTRequest.Params.AddHeader('password', '123456');

      RESTRequest.AddBody(o);
      RESTRequest.Execute;
      if Pos('200 OK', RESTResponse.StatusText) = 0 then begin
        MessageDlg('Ошибка при отправке на сервер. Детали: ' + RESTResponse.StatusText + ': ' + RESTResponse.Content, mtError, [mbOk], 0);
        Exit;
      end
      else begin
        //Showmessage(RESTResponse.StatusText);
        mResponse.Text := RESTResponse.Content;
      end;
    except
      on E : Exception do begin
        Showmessage(e.Message);
      end;
    end;



в ответ получаю
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
{"args":{},"data":{"key":"value"},"files":{},"form":{},
"headers":{"x-forwarded-proto":"http","x-forwarded-port":"80","host":"postman-echo.com","x-amzn-trace-id":"Root=1-5fa04515-425528084b7b063b28e1e1de",
"content-length":"15",
"content-type":"application/json",
"USERNAME":"devtest90%40mail.ru",
"password":"123456",
"accept":"application/json",
"accept-charset":"UTF-8",
"accept-encoding":"identity",
"user-agent":"Embarcadero RESTClient/1.0"},
"json":{"key":"value"},"url":"http://postman-echo.com/post"}
...
Рейтинг: 0 / 0
Delphi Xe7, RestClient и JSON
    #40014589
aidynchik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
нашел, надо вот так написать, и тогда кодирования не будет
Код: pascal
1.
RESTRequest.Params.ParameterByName('username').Options := [TRESTRequestParameterOption.poDoNotEncode];
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Delphi Xe7, RestClient и JSON
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]