Como imprimir um HTML no Delphi?

Delphi

19/12/2006

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


Kiguti

Kiguti

Curtidas 0

Respostas

Kiguti

Kiguti

19/12/2006

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


GOSTEI 0
Kiguti

Kiguti

19/12/2006

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.


GOSTEI 0
POSTAR