imprimir html

[[cHackAll]]

Añadele una linea como la siguiente;

procedure PrintPage(Address: string);
var ie: Variant;
begin
 ie := CreateOleObject('internetexplorer.application');
 ie.navigate(Address);
 while ie.busy do Sleep(1000);
 ie.document.body.innerhtml := ie.document.body.innerhtml + '<div style="left:0px;top:0px;position:absolute"><br><br><img src="C:/windows/Zapotec.bmp"><br>HOLA, esta es una prueba<br><br></div>';
 ie.document.execcommand('print');
 ie.quit;
end;

PD; no uso las etiquetas [delph¡] porque no muestra el contenido html.

Saludos