Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как вытащить картинки из TWebBrowser? [D5, Win95/98, WinME, NT4, Win2k, WinXP]


URL ©   (2002-09-20 10:15:00) 

Допустим я загрузил в TWebBrowser картинку с известным мне URL. Как теперь ее вытащить оттуда и сохранить на диск?


Ascan_   (2002-09-20 14:33:00) [1]

У меня пока получалось следующим образом:
1) этой из коллекции беру url"ы (это, как я понял, ты умеешь);
2) с помощью URLDownloadToFileсохраняем на диск.

А теперь мой вопрос для Знатоков: как получить/загрузить картинку, зная ее url или прямо из TWebBrowser, не сохраняя на диск? Т.е. в Image/Stream/Clipboard... (лучше конечно первый вариант).

P.S. Прошу прощения у URLза уход от его вопроса, но думаю ему это тоже будет интересно...


Ш-К   (2002-09-20 14:28:00) [2]

А не получится вытянуть из IHTMLElementCollection. Там только атрибуты тегов.
И вообще, загружить катринки в браузер, а потом пытаться их вытянуть оттуда - глупо. (Тем более, что мисс не даёт на это прямых инструментов). Надо наоборот: сначала довнлоад картинок по сылкам, а потом отображать.


URL   (2002-09-20 10:51:00) [3]

Ну вот пишу такой код

Var
doc:IHTMLDocument2;
im:IHTMLElementCollection;
begin
If wb1.Busy Then exit;
Doc := WB1.Document As IHTMLDocument2;
im:=doc.Get_images;

Теперь я получил все картинки. А что дальше? Как вытянуть их из IHTMLElementCollection?


Наверх

Титульная страница Поиск, карта сайта Написать письмо