Web API in ein Programm einbinden

[Towmuz]

Moin,

da musst du nicht viel einbinden, du sendest HTTP GET Anfragen an den Server und der liefert dir JSON zurück.

Hier nur mal so als Denkanstoß...(Umgebautes Bsp. von Emba)

Delphi-Quellcode:

uses
  IdHTTP, JSON;

procedure Form1.Button1Click(Sender: TObject);
var
  res: string;
  val: TJSONValue;
  HTTP: TIdHTTP;
begin
  HTTP  := TIdHTTP.Create(nil);
  HTTP.Request.UserAgent := 'Mozilla/5.0 (Windows NT 6.1; WOW64; rv:56.0) Gecko/20100101 Firefox/56.0'; // *
  res   := HTTP.Get('https://api.realliferpg.de/v1/market/1');
  val   := TJSONObject.ParseJSONValue(res);

  if val is TJSONObject then
  begin
    ShowMessage(val.GetValue<string>('data[0].price'));
  end;
end;

* Den Standarduseragent der in TIdHttp hinterlegt ist, hat er bei mir eben mit 403 abgelehnt (Mozilla/3.0 glaub ich und den akzeptiert der Server mit der API nicht).

Ich schätze aber mal, in deiner Delphi Version gibt´s den ganzen JSON Kram noch nicht und du müsstest wahrscheinlich mal nach Delphi JSON googlen oder du holst dir die momentan (?) kostenlose Starterversion von Embarcadero.