Consumir api rest com delphi 2010

dpaulabh · 14 Outubro, 2020

Boa tarde.

Preciso consumir uma api rest com D2010.

Atualizei o Indy e mesmo assim ao realizar a operação usando SSL recebo o erro abaixo:

Utilizo o Idhttp com o IOHandle apontado para um IdSSL com as opções assim:

Segue código que estou usando:

url := 'https://bbbbbbbbbbbbbbbbbbbbbbbbbbb/token';
http.Request.Clear;
http.Request.ContentType := 'application/x-www-form-urlencoded';
http.Request.BasicAuthentication := true;
DadosSeguranca := TStringList.Create;
DadosSeguranca.Clear;
DadosSeguranca.Add('grant_type=client_credentials');
DadosSeguranca.Add('client_id=xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx');
DadosSeguranca.Add('client_secret=uuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuu');
response := http.Post(url, DadosSeguranca);
ShowMessage(response);