Fórum Como imprimir um HTML no Delphi? #334959
19/12/2006
0
Eu tenho uma aplicação que gera uma carta para o usuário em formato HTML. Hoje essa carta já é mandada por email, e gostaria de imprimir este HTML também.
Tentei utilizar o TWebBrowser com o seguinte trecho de código.
procedure Imprime(webHTML: TWebBrowser);
var
vIn, vOut: OleVariant;
begin
webHTML.ControlInterface.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER, vIn, vOut) ;
end;
Ele imprimiu, mas como o componente usa o browser do windows ele imprimiu também o cabeçalho e rodapé na página. Eu não quero que saia nem o cabeçalho e nem o rodapé e muito menos vou alterar as configurações do internet explorer.
Há outra maneira de imprimir? Com outro componente ou de qualquer outra forma?
Eu vi no forum dizendo que se colocasse isto:
webHTML.ControlInterface.AddressBar := False;
webHTML.ControlInterface.MenuBar := False;
não sairia, mas continua saindo mesmo assim.
Atenciosamente,
Kiguti
Tentei utilizar o TWebBrowser com o seguinte trecho de código.
procedure Imprime(webHTML: TWebBrowser);
var
vIn, vOut: OleVariant;
begin
webHTML.ControlInterface.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER, vIn, vOut) ;
end;
Ele imprimiu, mas como o componente usa o browser do windows ele imprimiu também o cabeçalho e rodapé na página. Eu não quero que saia nem o cabeçalho e nem o rodapé e muito menos vou alterar as configurações do internet explorer.
Há outra maneira de imprimir? Com outro componente ou de qualquer outra forma?
Eu vi no forum dizendo que se colocasse isto:
webHTML.ControlInterface.AddressBar := False;
webHTML.ControlInterface.MenuBar := False;
não sairia, mas continua saindo mesmo assim.
Atenciosamente,
Kiguti
Kiguti
Curtir tópico
+ 0
Responder
Posts
20/12/2006
Kiguti
Pessoal,
Eu achei como personalizar o rodapé e cabeçalho do WebBrowser no site da Microsoft. Detalhe, está para o Visual C++. Se alguém conseguir traduzir para Pascal.
[url]http://support.microsoft.com/kb/267240[/url]
Kiguti
Eu achei como personalizar o rodapé e cabeçalho do WebBrowser no site da Microsoft. Detalhe, está para o Visual C++. Se alguém conseguir traduzir para Pascal.
[url]http://support.microsoft.com/kb/267240[/url]
Kiguti
Responder
Gostei + 0
20/12/2006
Kiguti
Comecei a implementar, mas estou tendo problemas com uma variável OleVariant.
Dica: precisa da unit ActiveX.pas
Estou tendo o seguinte erro:
Type not allowed in OLE Automation call
Criei um outro tópico para este problema.
Dica: precisa da unit ActiveX.pas
Estou tendo o seguinte erro:
Type not allowed in OLE Automation call
Criei um outro tópico para este problema.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)