Ver Mensaje Individual
  #8  
Antiguo 24-09-2003
Avatar de DarkSide
DarkSide DarkSide is offline
Miembro
 
Registrado: jun 2003
Ubicación: La Serena - Chile
Posts: 91
Reputación: 23
DarkSide Va por buen camino
Hola Cadetill, probe con el .Prepare pero el problema persiste, la unica forma de lograr que imprimiera fue agregando el siguiente codigo, que por lo demas nos es nada de ortodoxo:
Código:
  for x:=1 to 20 do begin
    frmInfoTot.QuickRep1.PrinterSettings.FirstPage:= x;
    frmInfoTot.QuickRep1.PrinterSettings.LastPage:= x;
    frmInfoTot.QuickRep1.Print;    
  end;
 {Suponiendo que no se imprimiran mas de 20 hojas por informe}
Si te sirve de algo el modelo de la impresora que me da problemas es: "HP LaserJet 1000 series" conectada a traves de USB.
Adios y gracias.
__________________
De los sueños se construye la realidad...
Responder Con Cita