Cita:
Empezado por Casimiro Notevi
Desconozco ese tema
Por probar, he preguntado al chatgpt y dice esto:
Código Delphi [-]uses
ShellAPI;
procedure TForm1.Button1Click(Sender: TObject);
var
FileName: string;
begin
FileName := 'C:\ruta\al\archivo.mhtml';
WebBrowser1.Navigate('file://' + FileName);
end;
procedure TForm1.Button2Click(Sender: TObject);
var
OLECMDID_PRINT2: Integer;
OLECMDEXECOPT_DONTPROMPTUSER: Integer;
begin
OLECMDID_PRINT2 := 6;
OLECMDEXECOPT_DONTPROMPTUSER := 2;
if WebBrowser1.OleObject.DocumentLoaded then
begin
WebBrowser1.OleObject.ExecWB(OLECMDID_PRINT2, OLECMDEXECOPT_DONTPROMPTUSER);
end;
end;
|
Esto funciono de maravilla, aunque no se si sea posible ocultar el dialog de guardar archivo que se genera y que en el PDF no se imprima en el header y en el footer información del navegador
Gracias por tu aporte casimiro!