Mandar a imprimir despues q se muestre el qreport

[ingabraham]

Compañeros mi programa es de Nomina

Código Delphi [-]
procedure TForm29.QRGroup1BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
begin
 
  if (NHOJAS mod  4=0 )Then
  begin
       Form29.QRGroup1.ForceNewColumn:=True; //NUEVA HOJA -SALTAR
      Form29.QRGroup1.ForceNewpage := True;
  end
   else
     begin
       Form29.QRGroup1.ForceNewColumn:=false; //COLILLAS UNIDAS
       Form29.QRGroup1.ForceNewpage:=false;
      end;
       NHOJAS:=NHOJAS+1;
End;

pero al momento de imprimir, no se me cumple esta condicion, se imprime otra cosa, por eso quiero q se genere el reporte y luego se imprima

[[Caral]]

Hola
Lo normal

Código Delphi [-]
     try
   QRepor:=TQRepor.Create(self);
  QRepor.Preview;
     finally
   QRepor.Free;
      end;

Saludos

[ingabraham]

bUENO
ASI- asi si me funciona

Form29.QuickRep1.Preview;
Form29.QuickRep1.print;
ME SIRVE,
PERO QUIERO Q ME MUESTRE Y ME IMPRIMA,

ESTO LO Q HACE ES MOSTRAR Y CUANDO SALE IMPRIME

[[Caral]]

Hola
No entiendo
Cuando se llama al preview, este permite entre otras cosas, buscar la impresora y por supuesto imprimir.
Si se llama directo a Print, pues se imprime.
No se como hacer que se presente y se imprima, tal vez lo que propuso Egostar seria la forma, no se.
Saludos

[ingabraham]

Empezado por Caral

Hola
No entiendo
Cuando se llama al preview, este permite entre otras cosas, buscar la impresora y por supuesto imprimir.
Si se llama directo a Print, pues se imprime.
No se como hacer que se presente y se imprima, tal vez lo que propuso Egostar seria la forma, no se.
Saludos

Yo quiero q al momento q muestre se imprima

[ContraVeneno]

Empezado por ingabraham

Mira lo q pasa es q tengo un codigo en el qrgroup para mostrar los datos de 4 en 4.
entonces necesito que despues q se genere el preview me imprima,
ya q no me quiere imprimir lo que quiero q salga en el qreport,

por eso es q quiero q me muestre el qreport y luego lo imprima, para q se cumpla el codigo del qrgroup.

Es mas bien hay un problema de concepto, como ya te dijeron.

Un QuickReport tiene la opción para imprimir o para visualizar, pero son cosas distintas. No tiene sentido hacer una y luego la otra. Si tu sistema requiere que algo se imprima, se utiliza el comando Print. Si la impresión es opcional al usuario, se utiliza el comando Preview. Ningún código o ninguna acción relacionada con el reporte, debería de ejectuarse al momento de utilizar print o preview, es decir, la instrucción Print o la instrucción Preview, debería ser la última acción.

Aquí el problema creo yo, es que en lugar de tener ese código en el evento BeforePrint de la banda TQRGroup, deberías tenerlo en el evento BeforePrint del Reporte mismo.

[ingabraham]

Empezado por ContraVeneno

Es mas bien hay un problema de concepto, como ya te dijeron.

Un QuickReport tiene la opción para imprimir o para visualizar, pero son cosas distintas. No tiene sentido hacer una y luego la otra. Si tu sistema requiere que algo se imprima, se utiliza el comando Print. Si la impresión es opcional al usuario, se utiliza el comando Preview. Ningún código o ninguna acción relacionada con el reporte, debería de ejectuarse al momento de utilizar print o preview, es decir, la instrucción Print o la instrucción Preview, debería ser la última acción.

Aquí el problema creo yo, es que en lugar de tener ese código en el evento BeforePrint de la banda TQRGroup, deberías tenerlo en el evento BeforePrint del Reporte mismo.

Bueno, comprendo lo que dices
pero por q al momento de aplicar

Form29.QuickRep1.Preview;
Form29.QuickRep1.print;

o
Form29.QuickRep1.print;
Form29.QuickRep1.Preview;

me imprime de una manera diferente.

te recuerdo q tengo un codigo en el qrgroup para mostrar 4 registros por hoja y esto es lo q me causa esto
entonces
ami me sirve este:
Form29.QuickRep1.Preview;
Form29.QuickRep1.print;
para q ejecute lo q esta en el qrgroup y luego lo imrpima.
me hago entender, pero quiero q no tenga q cerrar el reporte para q empiece la impresion. q lo muestre y comience a imprimir

[ContraVeneno]

lo que necesitas es preparar el reporte... consulta sobre la función "Prepare" de quickreports