Dicas - Imprimir documento/página em um WebBrowser

Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Para efetuar o download você precisa estar logado. Clique aqui para efetuar o login
Confirmar voto
0
 (2)  (0)

Veja nesta dica, como implementar funcionalidades de impressão em um componente WebBrowser.

Imprimir documento/página em um WebBrowser

 

Veja como imprimir um documento/página em um WebBrowser e ainda como chamar a tela de configuração de impressora, a tela de configuração de página e a tela de pré-visualização da impressão.

 

Nota: primeiramente você precisa carregar uma página em um WebBrowser, por exemplo (se possui um componente chamado WebBrowser1):

 

WebBrowser1.Navigate('http://www.clubedelphi.net')

 

{ Imprime diretamente, sem a tela de impressão }

procedure WBPrintNoDialog(WB: TWebBrowser) ;

var

  vIn, vOut: OleVariant;

begin

  WB.ControlInterface.ExecWB(OLECMDID_PRINT,

    OLECMDEXECOPT_DONTPROMPTUSER, vIn, vOut);

end;

 

{ Abre a tela de impressão }

procedure WBPrintWithDialog(WB: TWebBrowser) ;

var

  vIn, vOut: OleVariant;

begin

  WB.ControlInterface.ExecWB(OLECMDID_PRINT,

    OLECMDEXECOPT_PROMPTUSER, vIn, vOut) ;

end;

 

{ Pré-visualização da impressão }

procedure WBPrintPreview(WB: TWebBrowser) ;

var

  vIn, vOut: OleVariant;

begin

  WB.ControlInterface.ExecWB(OLECMDID_PRINTPREVIEW,

    OLECMDEXECOPT_DONTPROMPTUSER, vIn, vOut) ;

end;

 

{ Abre a tela de configuração da página }

procedure WBPrintPageSetup(WB: TWebBrowser) ;

var

  vIn, vOut: OleVariant;

begin

  WB.ControlInterface.ExecWB(OLECMDID_PAGESETUP,

    OLECMDEXECOPT_PROMPTUSER, vIn, vOut) ;

end;

 

 
Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Receba nossas novidades
Ficou com alguma dúvida?