超级难题：如何将TWebBrowser 里显示的页面转成图片格式？

Question

我在做个web页预览的工具，需要在一个form中显示10个页面，所以必须将web页缩小，我想能不能将TWebBrowser 里显示的Web页转成图片格式，或者其它方式将Web页转成图片格式？
或者有直接把web页变小的方法？

Answer 1

很简单！ 有 THANDLE 就行了

Answer 2

怎样把一个网页转换为图片：
procedure TForm1.Button1Click(Sender: TObject); 
var 
 ViewObject: IViewObject; 
 sourceDrawRect: TRect; 
begin 
 if EmbeddedWB1.Document <> nil then 
 try 
   EmbeddedWB1.Document.QueryInterface(IViewObject, ViewObject); 
   if ViewObject <> nil then 
     try 
       sourceDrawRect := Rect(0, 0, Image1.Width, Image1.Height); 
       ViewObject.Draw(DVASPECT_CONTENT, 1, nil, nil, Self.Handle, 
         image1.Canvas.Handle, @sourceDrawRect, nil, nil, 0); 
     finally 
       ViewObject._Release; 
     end; 
 except 
 end; 
end; 

Answer 3

温度值在-10度……120度，用不同的颜色表示，分辨率为1度，
如何处理，
如果把TCOLOR的值均分好像不太好，至少-10度和10 读的颜色用肉眼分辨不出来！