« RequestAccept (http) » : différence entre les versions
(Page créée avec « {{new|710}} <source lang='delphi'>property RequestAccept:string;</source> '''Lecture et écriture''' Cette propriété permet l'accès en lecture et écriture de la pro... ») |
Aucun résumé des modifications |
||
| Ligne 11 : | Ligne 11 : | ||
var http : THttpClient; | var http : THttpClient; | ||
begin | begin | ||
http := ThttpClient.Create(nil); | http := ThttpClient.Create(nil); | ||
try | try | ||
http. | http.URL := 'http://localhost:82/treso/server/sdata/api/echo'; | ||
http.method := hrmPost; | |||
http.postdatastr := '{"paramName":"value"}'; | |||
http.RequestAccept := 'application/json'; | |||
http.Execute; | http.Execute; | ||
ShowMessage(http.ResponseStr); | ShowMessage(http.ResponseStr); | ||
except | except | ||
ShowMessage(http.ErrorText); | ShowMessage(http.ErrorText); | ||
end; | end; | ||
end; | end; | ||
Dernière version du 2 décembre 2016 à 20:47
|
property RequestAccept:string;
Lecture et écriture
Cette propriété permet l'accès en lecture et écriture de la propriété Accept de la requête.
Exemple:
var http : THttpClient;
begin
http := ThttpClient.Create(nil);
try
http.URL := 'http://localhost:82/treso/server/sdata/api/echo';
http.method := hrmPost;
http.postdatastr := '{"paramName":"value"}';
http.RequestAccept := 'application/json';
http.Execute;
ShowMessage(http.ResponseStr);
except
ShowMessage(http.ErrorText);
end;
end;
end;