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

Вниз

Изображение в WebBrowser   Найти похожие ветки 

 
Ertong ©   (2004-12-26 20:32) [0]

В WebBrowser загружено страницу. Нужно извлечь какой-нибудь рисунок (по номеру или по имени), например, в TBitmap.

Пробовал использовать IHTMLImgElement, но там и намека нет на само изображение.

Может кто-то сталкивался с этой проблемой?


 
Seeker ©   (2004-12-27 11:25) [1]

Делай так, и учись юзать поиск...


uses ClipBrd;
...
procedure TForm1.LoadImage(N:integer);
var body, imgs, controlRange: olevariant;
begin
body := WebBrowser1.OleObject.document.body;
imgs := WebBrowser1.OleObject.document.images.item(N);//нужный img
controlRange := body.createControlRange;
controlRange.add(imgs);// вместо imgs можно сразу вставить WebBrowser1.OleObject.document.images.item(N)
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.


 
Ertong ©   (2004-12-27 17:56) [2]

Спасибо за помощь.
Но метод, все-таки, не очень "провельный", но мне подходит.


 
Seeker ©   (2004-12-28 12:26) [3]


> Ertong ©

А ты придумай по другому.Как придумаешь - напиши.



Страницы: 1 вся ветка

Текущий архив: 2005.03.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
9-1102443928
Макс
2004-12-07 21:25
2005.03.06
GLFPSMovementManager


3-1107772442
Apophis
2005-02-07 13:34
2005.03.06
Работа с таблицами Paradox в сети - проблема с доступом!


1-1108547754
Slonco
2005-02-16 12:55
2005.03.06
Как войти в режим редактирования?


14-1108091284
Думкин
2005-02-11 06:08
2005.03.06
С Днем рождения! 11 февраля


4-1106820066
lehich
2005-01-27 13:01
2005.03.06
ограничение на передачу данных в WORD???