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

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

WebBrowser и картинки

Владимир__ ©   (2006-03-01 12:32:00) 

Приветствую! Возможно ли сохранить картинку в TWebBrowser'е именно ту что загрузилась в компоненте, а не просто по ссылке (urldownloadToFile). Просто по ссылке нельзя в данном случае использовать, т.к. картинка генерируется динамически, а мне нужна именно та, что загрузилась. Заранее спасибо

---

Владимир__   (2006-03-04 01:40:00) [1]

Спасибо:)

---

seeker   (2006-03-03 10:49:00) [2]


...
uses ClipBrd;
...
procedure TForm1.Button1Click(Sender: TObject);
var body, imgs, controlRange: olevariant;
begin
body := WebBrowser1.OleObject.document.body;
imgs := WebBrowser1.OleObject.document.images.item(0);//нужный img
controlRange := body.createControlRange;
controlRange.add(imgs);
controlRange.execCommand('Copy', False, EmptyParam);//копируем
if ClipBoard.HasFormat(CF_BITMAP) then begin
Image1.Picture.Bitmap.LoadFromClipboardFormat(cf_BitMap, ClipBoard.GetAsHandle(cf_Bitmap), 0);//вставляем
Clipboard.Clear;//по желанию чистим буфер...
end;
end;
...
initialization
OleInitialize(nil);

finalization
OleUninitialize;

end.

ps: кто ищет тот всегда найдет...

---

Наверх