Ola a todos!
Estou precisando reproduzir em Delphi uma função implementada em Python. A função faz um Get em uma url especifica, eu sei que em Delphi eu deveria usar o componente TIdHTTP, mas não estou conseguindo configura-lo da forma correta, segue a baixo o Código em Python, a parte que realmente preciso esta entre as duas linas comentadas:
def PingAPI(accessToken):
print ""
print "Ping API..."
print "Request [GET] /api/" + apiVersion + "/ping"
result = False
try:
#INICIO DA PARTE EM QUE ESTOU REALMENTE EM DÚVIDA
conn = httplib.HTTPSConnection(tvApiBaseUrl, tvApiPort)
conn.connect()
request = conn.putrequest('GET', '/api/' + apiVersion + '/ping')
headers = {}
headers['Authorization'] = 'Bearer ' + accessToken
for k in headers:
conn.putheader(k, headers[k])
conn.endheaders()
resp = conn.getresponse()
statusStr = resp.reason
statusCode = resp.status
#FIM DA PARTE EM DUVIDA
print statusCode, statusStr
if (statusCode != 200):
print "Unexpected response code. Received content was:"
print resp.read()
result = False
return result
jsonResp = json.loads(resp.read())
tokenValue = jsonResp["token_valid"]
if(tokenValue == True):
print "Ping: Token is valid"
result = True
else:
result = False
except Exception, e:
print "Request failed! The error was: ", e
result = False
return result
Obrigado.