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

Вниз

Кусок Webbrowser в Bitmap   Найти похожие ветки 

 
:-))   (2006-03-13 21:40) [0]

У меня в WEBBROWSER1 загружена страница а нужно получить битмап содержащий определенную прямоугольную область Webbrowser1 (например прямоугольник 400 420 500 520), но у webbrowser нет св-ва canvas. Помогите, пожалуйста, решить эту проблему. Спасибо


 
Ihor Osov'yak ©   (2006-03-13 22:43) [1]

что то примерно так -

procedure TFormCopyPicture.DoProcess(iDoc: IDispatch;
 top, left,  height, width: integer;
 YMax,XMax:integer);

var
 ViewObject: IViewObject;
 sourceDrawRect,srcRect,destRect: TRect;

begin

if not assigned(iDoc) then Exit;

iDoc.QueryInterface(IViewObject, ViewObject);
if not assigned(ViewObject) then exit;

ImageMain.Align := alNone;

ImageMain.Width := xMax;
ImageMain.Height := yMax;
imgTask.Width:= width;
imgTask.Height:=height;
sourceDrawRect := Rect(0, 0, ImageMain.Width, ImageMain.Height);
ViewObject.Draw(DVASPECT_CONTENT, 1, nil, nil, Self.Handle,
         imageMain.Canvas.Handle, @sourceDrawRect, nil, nil, 0);
ViewObject := nil;

srcRect:=Rect(left,top,left+width,top+height);
destRect:=Rect(0,0,width,height);
imgTask.Canvas.CopyRect(destRect,ImageMain.Canvas,srcRect);

//inc(ii);
//imgTask.Picture.SaveToFile("c:\y"+IntToStr(ii)+".bmp");

....


 
:-))   (2006-03-14 20:34) [2]

У меня впечатление, что такой вариант я уже видел и мне он не понравился, но все-равно спасибо, еще раз посмотрю.
И вопрос, что указывать при вызове в iDoc?


 
Ihor Osov'yak ©   (2006-03-14 23:54) [3]

webbrowser.document


 
:-))   (2006-03-16 20:35) [4]

Лучше задам такой вопрос. Как сохранить определенный рисунок с сайта, загруженного в Webbrowser



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

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

Наверх




Память: 0.47 MB
Время: 0.056 c
2-1144083474
Isaev
2006-04-03 20:57
2006.04.23
TTreeView


15-1143695115
WondeRu
2006-03-30 09:05
2006.04.23
mailto link


11-1125182052
ebta
2005-08-28 02:34
2006.04.23
just a little bug v2.10


15-1143909658
Рамиль
2006-04-01 20:40
2006.04.23
А вы говорите первое апреля:-)


1-1142835437
Гость101
2006-03-20 09:17
2006.04.23
Изменить шрифт