Главная страница
    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.44 MB
Время: 0.012 c
1-26464
AndreyP
2003-05-29 13:27
2003.06.09
Как перебрать в цикле компоненты на форме?


3-26388
Wasilla
2003-05-21 14:04
2003.06.09
LangDriver in Table(change)


3-26412
prihod
2003-05-21 18:39
2003.06.09
Команды компонента Query.Sql


14-26736
МуМу
2003-05-22 17:14
2003.06.09
Поиск в массиве по значению?


1-26522
Jaxtor
2003-05-27 16:17
2003.06.09
Динамический TComboBox





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский