Olá pessoal... Para capturar a imagem de um WebBrowser, estou usando o seguinte código: procedure WebBrowserScreenShot(const wb: TWebBrowser; const fileName: TFileName);
var
viewObject : IViewObject;
r : TRect;
bitmap : TBitmap;
begin
if wb.Document <> nil then
begin
wb.Document.QueryInterface(IViewObject, viewObject);
if Assigned(viewObject) then
try
bitmap := TBitmap.Create;
try
r := Rect(0, 0, 351, 287);
bitmap.Width := 352; // wb.Wid