Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 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.45 MB
Время: 0.009 c
3-26373
SashSt
2003-05-21 08:38
2003.06.09
SQL-запрос


14-26716
Aziz
2003-05-15 17:13
2003.06.09
Проблема с объектами


14-26677
Yr2
2003-05-24 17:22
2003.06.09
Компонент для отображения многокадрового GIF (анимация)


3-26391
Erden
2003-05-21 15:02
2003.06.09
IBQuery


14-26723
panov
2003-05-22 10:54
2003.06.09
Менеджер памяти от Борланд





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский