EA4D-R

eBay's RESTfull APIs SDK

Classes for Delphi 10.3 to 12.2 VCL & FMX

With 30 APIs and more than 280 functions, EA4D-R, provide full access to latest eBay RESTful API. eBay APIs (Application Programming Interface) are the front door to eBay's global marketplace platform.

They enable your business to expand into new contexts and allow third-party platforms to extend their value proposition.

eBay Developers Program membership is free, and you can now use Delphi to interface with eBay RESTful APIs

EA4D eBay RESTful APIs for Delphi

Features

APIs	30 APIs and 280 functions for buying, selling, commerce, marketing, analytics, and more...
Classes	available for Delphi 10.3 to Athens 12.1
No external library	this is pure x86/x64 Delphi Pascal
Code	with more than 120000 lines, the source code is provided through SVN for snappy updates, previews and more...
Post-Order API EA4D-X	manually mapped, is an extra add-on which implement self-service flows that process order cancellations and item returns

Delphi Examples

Getting ebay's SandBox current user email (Identity API)
(Tutorial01, Session File Editor provided)

begin
var Status := eBayR.Types.Status(nil);
var Params := eBayR.API.Identity.GetUser.Parameters;
var Response := eBayR.API.Identity.getUser.Call(UserSession, Params, nil, Status);
if Assigned(Response) and (Status.Code < 300) then
ShowMessage(Response.Fusername + ' : ' + Response.FindividualAccount.Femail)
else
if assigned(Status.Ferrors) then
ShowMessage(TError(Status.Ferrors[0]).FMessage);
Response.Free;
Params.Free;
Status.Free;
end;

Doing an "apple" search on eBay's SandBox (Browse API)
(Tutorial04, Session File Editor provided)

Memo1.clear;
var Status := eBayR.Types.Status(nil);
var Params := eBayR.API.Browse.search.Parameters;
Params.Query.Items['q'].Value := 'apple';
Params.Query.Items['auto_correct'].Value := 'KEYWORD';
Params.Query.Items['limit'].Value := 100;
var Response := eBayR.API.Browse.search.Call(UserSession, Params, nil, Status);
if Status.Ferrors = nil then
begin
if Response.FitemSummaries <> nil then
for var ItemSummary in Response.FitemSummaries do
begin
var Item := TItemSummary(ItemSummary);
var Line := Item.Ftitle + ' : ' + Item.Fprice.Fvalue + Item.Fprice.Fcurrency;
Memo1.Lines.add(Line);
end;
end;
FreeAndNil(Response);
FreeAndNil(Params);
FreeAndNil(Status);

Releases

>> SVN Repository <<

Start Now

Free EA4D-Traditional APIs
Trial Edition, Fully Fledged,
SandBox & Production worldwide
For Delphi 6 to 11.3
NO REGISTRATION
Free Support !
> Works in IDE only <

Get Started