Syfre le 9 juillet 2021 à 09:07

2021-07-09T09:07:24Z

Syfre : Page créée avec « function (const iServiceProvider:string; const iUrl:string; var jsonR:TJson):integer; Cette fonction exécute une requête POST sur un serv... »

2021-07-09T09:04:56Z

Page créée avec « <source lang="delphi">function (const iServiceProvider:string; const iUrl:string; var jsonR:TJson):integer;</source> Cette fonction exécute une requête POST sur un serv... »

Nouvelle page

<source lang="delphi">function (const iServiceProvider:string; const iUrl:string; var jsonR:TJson):integer;</source>

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

{|class="wikitable"
|-
!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:

<source lang="delphi">

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;

</source>

Voir aussi:

[[Category:TJson]]

@@ Ligne 9 : / Ligne 9 : @@
 |-
 |iServiceProvider
-|Nom du forunisseur de service utilisé pour configurer la requête
+|Nom du fournisseur de service utilisé pour configurer la requête
 |-
 |iURL

HttpPost (TJson) - Historique des versions

Syfre le 9 juillet 2021 à 09:07

Syfre : Page créée avec « function (const iServiceProvider:string; const iUrl:string; var jsonR:TJson):integer; Cette fonction exécute une requête POST sur un serv... »