Zwei Free / Open Source Bibliotheken für Delphi helfen, den Anteil selbst geschriebenen Codes für einen REST Client zu verkleinern:
delphi-oop, diese Bibliothek verwendet Attribute auf den Klassen die dann automatisch aus der JSON Struktur gefüllt werden:
Delphi-Quellcode:
TODataNorthwindClient = class(TSvRESTClient)
public
[GET] [Path('/Customers')] [Consumes(MEDIA_TYPE.JSON)]
function GetCustomers(): TCustomers; virtual;
end;
delphi-rest-client-api arbeitet ähnlich:
Delphi-Quellcode:
var
vPerson : TPerson;
begin
vPerson := RestClient.Resource('
http://localhost:8080/java-rest-server/rest/person/1')
.Accept(RestUtils.MediaType_Json)
.Get<TPerson>();
https://mikejustin.wordpress.com/201...es-for-delphi/
p.s. für das Mapping auf ein TDataSet gibt es in der Delphi REST Client Library die Klasse RESTResponseDataSetAdapter.
http://docwiki.embarcadero.com/RADSt...Client_Library