Foros Club Delphi - Avanzar una pagina, por cada registro

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)

- - Avanzar una pagina, por cada registro (https://www.clubdelphi.com/foros/showthread.php?t=67137)

alcides

31-03-2010 13:19:42

Avanzar una pagina, por cada registro

Hola a todos y gracias por la ayuda que me puedan brindar

Utilizo delphi 7 y mis tablas estan en access

Resulta que quiero imprimir X cantidad de registro y tengo lo siguiente

Cita:

begin
Qry_Imprime.Close;
Qry_Imprime.Parameters.ParamByName('playa_empleado1').value := playa_empleado1.Text;
Qry_Imprime.open;
While not qry_imprime.Eof do begin
ppReport1.Print;

qry_imprime.Next
end
ppReport1.Print;
end;

pero resulta que quiero que avance la pagina cada vez que lea un registro

de la forma como esta tengo que cerrar y seleccionar el printer cada vez que imprime un registro, y quiero seleccionar el printer una sola vez y que imprima todo, pero avanzando una pagina cada vez que imprima un registro.

Gracias mil,

Alcides
Rep.Dom.

Casimiro Notevi

31-03-2010 13:56:37

¿Y qué usas para imprimir?

alcides

31-03-2010 14:01:32

perdon, utilizo reportbuilder

Alcides
Rep.Dom.

Casimiro Notevi

31-03-2010 14:36:54

Aumenta el tamaño del "cuerpo" hasta que la suma de "cabecera"+"cuerpo"+"pié" sea cercano al tamaño de la página completa.
Luego pon todo a tamaño "estático" porque si dejas "dinámico" se autoajustará y no servirá de nada, ya sabes, tanto la cabecera, cuerpo y pié ponlo a tamaño estático. Con botón derecho en cada uno de ellos.

Bueno, yo lo llamo cabecera, cuerpo y pié... pero veo que en reportbuilder se llama: encabezado, detalle y pié :)

alcides

31-03-2010 16:56:37

Gracias Casimiro,

la forma como estoy leyendo el query no esta bien, porque cada vez que imprimo un registro, le doy close y de esa forma lee un nuevo registro PERO DEBO SELECCIONAR LA IMPRESORA NUEVA VEZ, Y ASI CON CADA UNO DE LOS REGISTRO HASTA LEERLO TODO.

Alcides
Rep.Dom.

alcides

31-03-2010 21:34:27

Hola nueva vez,

este es el qry que utilizo, para que verificar que es lo no estoy haciendo. Que no imprime todos los registros que cumplan con el parametro, uno por pagina sin necesidad de seleccionar la impresora por cada registro.

Código SQL [-]select   *  
from       Maestro_empleados 
where    playa_empleado   = :playa_empleado1
and        Estatus_Empleado <> 'I'
order by codigo_empleado1,codigo_empleado2,codigo_empleado3;

Gracias mil,

Alcides
Rep.Dom.

La franja horaria es GMT +2. Ahora son las 12:57:55.