Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.09;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.032 c
11-1129736845
thaddy
2005-10-19 19:47
2006.07.09
Freepascal and kol 2.16 need change of ppDelphi s windows.pas


2-1150823105
Vacek
2006-06-20 21:05
2006.07.09
Как можно в компоненте combobox выбрать, используя код, какую-н


2-1151052975
Neket
2006-06-23 12:56
2006.07.09
DBGrid


2-1151053682
elfebet
2006-06-23 13:08
2006.07.09
Не пойму ошибку и как выйти из ситуации.


2-1150833840
Glivera
2006-06-21 00:04
2006.07.09
Сохранение Excel документа