Picture im Webbrowser downloaden

[juelin]

Hallo zusammen,
ich habe ein Problem. Benutze Delphi XE5.
Ich rufe im Webbrowser eine Seite auf (https://www.lidl.de/de/billiger) und lese den HTML-Code aus.
Dabei werden auch Bilder angezeigt und im HTML-Code steht auch der Filename:

<img data-original="/media/product/0/0/1/9/7/5/6/rotkaeppchen-sekt-trocken-regular--5.jpg" alt="Rotkäppchen Sekt, trocken" class="lazy" /><span class="special">

Wie kann ich nun das Bild downloaden?

Gerne auch ein Beispiel senden.

Danke für die Hilfe.

Gruß Jürgen

[mjustin]

Die Bildresource hat die volle URL https://www.lidl.de/media/product/0/...regular--5.jpg

Zum Downloaden verwendet man einen HTTP Client, z.B. die Klasse TIdHTTP aus Indy.

Deren Get Methode liefert die Resource dann, z.B. wie hier beschrieben:

http://stackoverflow.com/questions/1...-url-in-delphi

P.S. um zu testen ob das Get funktioniert, kann man die vie Get erhaltendenen Daten über einen Filestream als lokale Datei speichern, und diese dann öffnen.

[himitsu]

Und dann noch die rechtliche Seite

* erlaubt es Lidl, dass man ihre Seite parst?
* haben die womöglich eine API, welche die gewünschten Infos liefert? (REST, SOAP usw.)
* was wird mit den Bildern bemacht und braucht man dafür z.B. eine Erlaubnis? (Bildrechte)
* ...

[juelin]

Hallo,
erst mal recht herzlichen Dank für die schnelle Hilfe.
Mit Indy kenne ich mich noch nicht so richtig aus.
Hier mein Code:

var MS: TMemoryStream;
var JPEG: TJPEGImage;

MS:=TMemoryStream.Create;
JPEG:=TJPEGImage.Create;
try
// IdHTTP1.get('https://www.lidl.de'+artbild2,MS);
IdHTTP1.get('https://www.lidl.de/media/product/0/0/1/9/7/5/6/rotkaeppchen-sekt-trocken-regular--5.jpg',MS);
Ms.Seek(0,soFromBeginning);
JPEG.LoadFromStream(MS);
Image1.Picture.Assign(JPEG);
finally
FreeAndNil(JPEG);
FreeAndNil(MS);
end;

Bei dem Befehl: IdHttp1.get bekomme ich folgende Fehlermeldung:
Exception der Klasse EIdIOHandlerPropInvalid mit der Meldung "Wert für IOHandler ist ungültig"

Kannst Du mir da helfen?
Danke und Gruß Jürgen

[pesi]

Hmmm... was spricht denn gegen den Befehl UrlDownloadToFile ??? Der macht doch genau das, eine Datei X aus dem Internet mit Name Y lokal speichern :shock:

[juelin]

in welcher Komponente ist die Methode URLDownloadToFile ?

[TiGü]

Zitat:

Zitat von juelin (Beitrag 1363458)

in welcher Komponente ist die Methode URLDownloadToFile ?

https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx

[t.roller]

WinApi.UrlMon, //UrlDownloadToFile

Delphi-Quellcode:

---
var ZDF, FNsav : String;
...
ZDF:= PChar(FileName);
FNsav:= PChar(Pfad + FileName);
if  UrlDownloadToFile(nil, PChar(ZDF), PChar(FNsav), 0, nil)= S_OK then...
...

[mjustin]

Zitat:

Zitat von juelin (Beitrag 1363453)

Bei dem Befehl: IdHttp1.get bekomme ich folgende Fehlermeldung:
Exception der Klasse EIdIOHandlerPropInvalid mit der Meldung "Wert für IOHandler ist ungültig"

Das passiert wenn man eine ältere Indy Version verwendet :)

Neuere Indy Versionen erzeugen bei einer HTTPS Adresse automatisch den IOHandler mit SSL/TLS Unterstützung *). Es gibt also zwei Lösungen:

a) Indy aktualisieren (es muss nicht in der Komponentenpalette installiert werden, man kann auch die Core/Protocol/System Verzeichnisse in den Projektsuchpfad aufnehmen)
b) eine TIdSSLIOHandlerSocketOpenSSL Komponente hinzufügen und sie dann der Property IdHTTP1.IOHandler zuweisen

Ausserdem müssen die OpenSSL DLLs im Suchpfad liegen.

*) Wie unter http://www.indyproject.org/sockets/b.../20141222.aspx beschrieben, muss die Unit in der der IOHandler enthalten ist explizit in der uses Klausel angegeben werden