Ayuda con TWebBrowser
 

Hola.

Me gustaría que me pudieran ayudar con el objeto WebBrowser, lo que quiero es que se visualize la página web completa pero pequeña, como un zoom de toda la página web, pero si hago pequeño el objeto solamente se visualiza parte de la página web y no completa.


Gracias por su ayuda, y Feliz año nuevo!!!!!!!!
:)

No tengo mucha idea del tema, pero me da la impresión de que no vas a poder hacer eso utilizando un TWebBrowser. Este componente lo que hace es utilizar IExplorer para poder usarlo dentro de tus programas. Ni el propio IExplorer permite eso, por lo tanto no veo fácil que puedas hacerlo con el componente.

Me da la impresión (o eso he entendido) que lo que necesitas es capturar una imagen de la Web y mostrarla; En ese caso sí puedes aplicar el zoom que necesites. Tal vez lo que tendrás que buscar es cómo capturar en una imagen el contenido de una web entera. Eso es posible hacerlo puesto que hay programa y extensiones que lo hacen, así que tal vez debas investigar por ahí.

Un saludo.

Hola,

No estoy seguro de que sea lo que necesites, pero, es posible cambiar el tamaño de la fuente del navegador mediante algo como esto:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  z: OleVariant;
begin
  z := 0;
  WebBrowser1.ExecWB(OLECMDID_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, z);
end;

Hasta donde he llegado "z" podría estar en un rango de 0 y 4. Eso en lo que respecta hasta la versión 7 de Internet Explorer. Con esta nueva versión se introduce otra posibilidad, el "optical zoom", que, no sólo cambia el tamaño de la fuente, pero el de la página en general, imágenes incluidas, por ejemplo. Sobre esto encontré información aquí. Y el asunto quedaría más o menos así:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
const
  OLECMDID_OPTICAL_ZOOM = 63;
var
  z: OleVariant;
begin
  z := 50;
  WebBrowser1.ExecWB(OLECMDID_OPTICAL_ZOOM, OLECMDEXECOPT_DONTPROMPTUSER, z);
end;

En este caso "z" podría tomar valores entre 10 y 1000, correspondientes al porcentaje de "zoom" aplicado. Con un valor de 50 logras una especie de "miniatura" de cualquier web, y no sé si es a esto a lo que te refieres o algo así.

Muy buena esa solución David. No conocía esa característica y utilizando el codigo que has puesto es fácil hacer un zoom "real" de la página, no sólo las fuentes de letra.
A partir de ahí generar una minuatura es sencillo capturando una porción de esa pantalla.

ay que decir que como bien comentas, sólo para IE 7, en versiones anteriores devuelve un error. :(

Muchas gracias, es justo lo que quería, si necesito más ayuda espero contar con ustedes.
:p

He encontrado una página con muchas utilidades sobre el componente twebbrowser entre ellas la de hacer zoom

http://delphimagic.blogspot.com/2009...rowser-ii.html