| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как вытащить рисунок (png) из HTML страницы?
sergey2 © (2003-02-23 20:10:00)Мастера! Мой вопрос может не совсем относится к сетям, но он имеет отношение к TWebBrowser. Я задавал подобный вопрос в разделе "Media" но там мне толком никто не ответил.
Вобщем имеется файл *.png в HTML документе, который открыт в Twebbrowser. нужно этот файл "перетащить" в Bitmap (или Timage). Bitmap и пр. не понимают файлы *.png. Так что нужно "перетащить" его с преобразованием в bmp.
Подскажите, как это сделать по-проще, не устанавливая дополнительных компонентов
Ihor Osov'yak (2003-04-08 20:33:00) [1]2 Rulka (08.04.03 11:57)
Сохраняет то, что веббровзер отображает в данный момент времени..
Как альтернатива - скачать по новому картинку с инета..
Rulka (2003-04-08 11:57:00) [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;
sergey2 (2003-02-24 20:43:00) [3]up
| |
