[abelaquino]

.... directo sin que me salga la vista previa ni seleccionar impresora que hago?

if (DMDefinicionVentaModeloImpresion.FDDefinicionVentaReporteVISTA_PREVIA.Value = 'N') and (DMDefinicionVentaModeloImpresion.FDDefinicionVentaReporteSELECCIONAR_IMPRESORA.Value = 'N') then
begin
DMVentaImpresion.frxReport1.PrintOptions.Copies := DMVentaImpresion.FDModeloImpresionCOPIAS.Value;
DMVentaImpresion.frxReport1.PrintOptions.ShowDialog := False;
DMVentaImpresion.frxReport1.Print;
end;