Yo con Prepare utilizo esta secuencia:
Cita:
Application.CreateForm(TfrLptFactura,frLptFactura);
frlptFactura.LptFactura.Prepare;
nPages:=frLptFactura.lptFactura.Printer.PageCount;
Case n of
1:frlptFactura.lptFactura.PreviewModal;
2:frlptFactura.lptFactura.Print;
end;
frlptFactura.close;
|
Se trata de un pequeño procedimiento que utilizo para previsualizar o imprimir, dependiendo como se ve de un número que le paso como parámetro.
Un Saludo.