Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   Controlar copias en rave reports (https://www.clubdelphi.com/foros/showthread.php?t=65061)

carlos munera 17-11-2009 23:51:23

Controlar copias en rave reports
 
Hola a todos, me encuentro desarrollando un aplicativo en delphi 2010, y en la parte de informes necesito controlar las copias a imprimir; es decir, lo que se quiere es que, cuando se vaya a imprimir un reporte; en delphi o en rave me cuente la cantidad de copias y pueda almacenar el numero en la base de datos.Esto lo necesito despues de imprimir(no antes, ni en el preview);

Yo he creado un campo "acumulador", en la base de datos, donde guardare el numero de copias.

Este es el codigo que he puesto en el evento afterprint del componente rvsystem

Código Delphi [-]
procedure Treportesmd.rsreporte1AfterPrint(Sender: TObject);
begin
  if rsreporte1.SystemPrinter.Copies>=1 then begin  
    datos.rpcabdisponibilidad.close; 
    datos.rpcabdisponibilidad.open; 
    datos.rpcabdisponibilidad.Locate('CDI_ID',102,[]); 
    datos.rpcabdisponibilidad.Edit; 
    datos.rpcabdisponibilidadcdi_print.value:=datos.rpcabdisponibilidadcdi_print.value+ rsreporte1.SystemPrinter.Copies; 
    if Datos.rpcabdisponibilidad.ApplyUpdates(0) > 0 then 
    begin 
      Abort; 
    end; 
  end; 
end;


aqui digo que si las copias a imprimir son mayores o igual a 1 busqueme el registro al que quiero asignarle el numero de copias. y guardeme el numero de copias a imprimir.

con esto el me guarda el numero de copias en la bd, pero el problema esta en que me lo guarda antes de imprimir el documento tangible(a pesar de que esta en el evento afterprint).

Me podrian decir que estoy haciendo mal, en verdad no lo se.

de ante mano les agradesco su ayuda.


La franja horaria es GMT +2. Ahora son las 08:17:22.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi