using delphi rad 10.3.2 ... cannot establish correct setting for sslsocket
In code provided, I have tried assigning "IdSSL" many ways. not have worked. Can anyone help? Thank you.
procedure TForm1.Button4Click(Sender: TObject);
var
crlf,json: string;
idHTTP1: TIdHTTP;
//IdSSL: TIdSSLOpenSSL;
ParamList: TStringList;
result:string;
begin
///////////////////
idHTTP1 := Tidhttp.Create(nil);
{
IdSSL := TIdSSLIOHandlerSocketOpenSSL.Create(nil);
idHTTP1.ReadTimeout := 30000;
idHTTP1.IOHandler := IdSSL;
IdSSL.SSLOptions.Method := sslvTLSv1;
IdSSL.SSLOptions.Method := sslvTLSv1;
IdSSL.SSLOptions.Mode := sslmUnassigned;
}//////////////
ParamList := TStringList.Create;
try
ParamList.Add('');
idHTTP1 := TIdHTTP.Create(nil);
try
Result := idHTTP1.post(
'https://api.census.gov/data/2017/acs/acs5?get=NAME,group(B01001)&for=us:1'
,ParamList);
showmessage(result);
finally
idHTTP1.Free;
end;
finally
ParamList.Free;
end;
end;
expecting return data, never gets that far.