Скачать: CL | DM;

Как вытащить рисунок (png) из HTML страницы?   Найти похожие ветки 

← →
sergey2   (2003-02-23 20:10) [0]

Мастера! Мой вопрос может не совсем относится к сетям, но он имеет отношение к TWebBrowser. Я задавал подобный вопрос в разделе "Media" но там мне толком никто не ответил.

Вобщем имеется файл *.png в HTML документе, который открыт в Twebbrowser. нужно этот файл "перетащить" в Bitmap (или Timage). Bitmap и пр. не понимают файлы *.png. Так что нужно "перетащить" его с преобразованием в bmp.
Подскажите, как это сделать по-проще, не устанавливая дополнительных компонентов

---

← →
sergey2   (2003-02-24 20:43) [1]

up

---

← →
Rulka   (2003-04-08 11:57) [2]

Этот код сохраняет веб страничку в bitmap?
Сам не пробовал. Нашел в форумах.
Напишите чот не так.


Исходный код:
procedure TForm1.Button1Click(Sender: TObject);
var
ViewObject: IViewObject;
sourceDrawRect: TRect;
begin
if EmbeddedWB1.Document < > nil then
try
EmbeddedWB1.Document.QueryInterface(IViewObject, ViewObject);
if ViewObject < > nil then
try
sourceDrawRect := Rect(0, 0, Image1.Width, Image1.Height);
ViewObject.Draw(DVASPECT_CONTENT, 1, nil, nil, Self.Handle,
image1.Canvas.Handle, @sourceDrawRect, nil, nil, 0);
finally
ViewObject._Release;
end;
except
end;
end;

---

← →
Ihor Osov'yak ©   (2003-04-08 20:33) [3]

2 Rulka (08.04.03 11:57)

Сохраняет то, что веббровзер отображает в данный момент времени..

Как альтернатива - скачать по новому картинку с инета..

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c