Форум: "Сети";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];
ВнизКак вытащить рисунок (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 вся ветка
Форум: "Сети";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.012 c