HttpPost (TJson)

De Wiki1000
Version du 9 juillet 2021 à 11:04 par Syfre (discuter | contributions)
(diff) ← Version précédente | Voir la version courante (diff) | Version suivante → (diff)
function (const iServiceProvider:string; const iUrl:string; var jsonR:TJson):integer;

Cette fonction exécute une requête POST sur un service REST et retourne la réponse dans la variable jsonR.

Paramètre Usage
iServiceProvider Nom du forunisseur de service utilisé pour configurer la requête
iURL URL relative à l'URL du fournisseur de service
jsonR Objet jsonR recevant la réponse

Exemples:

var jsonQ,jsonR:TJson; rslt:Integer; AStr:string; 
begin
  jsonQ := Tjson.Create('{....}');
  //
  rslt := jsonQ.httpPost('myServiceProvider','/myapi/myressource',jsonR); 
 
  if Assigned(jsonR) then
   begin
     // response has a json payload
     ShowMessage(Format('HTTP: %d %s',[rslt, jsonR.AsString));
   end
   else
   begin
     // response has no json payload
     ShowMessage(Format('HTTP: %d %s',[rslt, jsonQ.httpResponseText));
   end;
end;

Voir aussi:





Whos here now:   Members 0   Guests 0   Bots & Crawlers 1
 
Outils personnels