Entwickler-Ecke

Internet / Netzwerk - JSON string von URL Laden und in Delphi als String ausgeben


idefix123456 - Fr 17.12.10 12:04
Titel: JSON string von URL Laden und in Delphi als String ausgeben
Hallo,

Ich suche jetzt schon vergebens nach einer function mit der ich einen JSON String von einer URL auslesen kann. Wer kann mir helfen? Danke



Bsp:

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
 
function GetJsonString(url: string): string;

result := //Ausgabe des json strings

end;


// Ausgabe Testbeispiel:
Memo1.Text := GetJsonString('http://url.de/json');


jaenicke - Fr 17.12.10 12:12
Wie wird der denn zurückgegeben? Ist das einfach der Text der Seite? Oder machst du auf der Seite noch etwas mit Skripten?

Einfach eine Seite abrufen geht mit Indy:

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
 
uses
  IdHttp;

var
  HttpLoader: TIdHttp;
  PageContents: String;
begin
  HttpLoader := TIdHttp.Create;
  try
    PageContents := HttpLoader.Get('http://www.example.com');
  finally
    HttpLoader.Free;
  end;
end;


idefix123456 - Fr 17.12.10 12:24
Habe es hinbekommen... Danke


Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
 
function CheckUrl(url: string): string;
var
  HttpLoader: TIdHttp;
begin
  HttpLoader := TIdHttp.Create;
  try
    result := HttpLoader.Get(url);
  finally
    HttpLoader.Free;
  end;
end;


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!