RequestAccept (http)
De Wiki1000
(Différences 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... ») |
|||
| 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; | ||
Version actuelle en date du 2 décembre 2016 à 21: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;
