Форум: "Сети";
Текущий архив: 2006.07.09;
Скачать: [xml.tar.bz2];
ВнизWebBrowser и картинки Найти похожие ветки
← →
Владимир__ (2006-03-01 12:32) [0]Приветствую! Возможно ли сохранить картинку в TWebBrowser"е именно ту что загрузилась в компоненте, а не просто по ссылке (urldownloadToFile). Просто по ссылке нельзя в данном случае использовать, т.к. картинка генерируется динамически, а мне нужна именно та, что загрузилась. Заранее спасибо
← →
seeker © (2006-03-03 10:49) [1]
...
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: кто ищет тот всегда найдет...
← →
Владимир__ (2006-03-04 01:40) [2]Спасибо:)
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2006.07.09;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c