Hallo zusammen!
Ich versuche gerade den Quelltext einer Website auszulesen. Mit der Komponente TWebbrowser hab ich es auch einigermaßen geschafft, allerdings habe ich schon öfters gelesen, dass der Webbrowser eher weniger zu empfehlen ist. (zumal ich an einer Darstellung der Website eigentlich gar nicht interessiert bin)
Nach etwas herumprobieren habe ich mit TIdhttp ebenfalls eine Webseite als Quelltext anzeigen lassen können. Allerdings unterscheidet(es gibt ein paar Ähnlichkeiten ^^) sich der Quelltext von dem, wie er zB im FireFox zu sehen ist (weswegen ich die benötigten Daten auch nicht auslösen kann).
Liegt das an irgendeiner Einstellung der
Indy-Komponente oder möglicherweise an der Website?
Bzw gäbe es eine schnellere Methode, an den Quelltext einer Seite heranzukommen?
Schon mal vielen an alle, die sich die Mühe machen zu helfen.
(ah ja, ich nutze Delphi 2009 und die mitgelieferten
Indy-Kompnenten (10 glaube ich)
Code schaut in etwa so aus
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
quelltext:TMemoryStream;
begin
quelltext := TMemoryStream.Create;
try
memo1.text:=idhttp1.Get('http://www.google.at'); //Edit :)
quelltext.Seek(0, soFromBeginning);
finally
idhttp1.Free;
quelltext.Free;
end;
end;