Cola, Post запрос не так делается.
Попробуй Body-тело Post-запроса передать через TStream, а не через TstrigList, вот так:
Старайся использовать System.Net.HttpClient вместо устаревшего IdHttp ...
если конечно у тебя не Delphi 7 ...
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
uses
System.SysUtils
, System.Classes
, System.Net.HttpClient
, System.Net.URLClient
;
Function Tbanking.Post_1(sign:string;dat_start:string;dat_end:string;card:string):string;
var
HTTPClient: THTTPClient;
Response: IHTTPResponse;
RequestStream: TStream;
str: TStringList;
url, result1: string;
begin
HTTPClient := THTTPClient.Create;
str := TStringList.Create(); //создадим переменную str
try
// str.Add -- заполняем Body
url := 'https://api.asdf.com/api'; //адрес сайта
RequestStream := TStringStream.Create(str.Text, TEncoding.UTF8, False);
Response := HTTPClient.Post(url, RequestStream);
result1 := Response.ContentAsString(TEncoding.UTF8);
finally
RequestStream.Free;
str.Free;
HTTPClient.Free;
end;
end;
