Ver Mensaje Individual
  #3  
Antiguo 29-03-2011
Avatar de Combat-F2D
Combat-F2D Combat-F2D is offline
Miembro
 
Registrado: may 2003
Ubicación: Toletum
Posts: 454
Reputación: 22
Combat-F2D Va por buen camino
puedes crear una variable:
Código Delphi [-]
tSubTotal: Float;

en el evento beforeprint del informe la inicializas a cero:
Código Delphi [-]
tSubTotal := 0;

en el evento beforeprint del detalle:
Código Delphi [-]
tSubtotal := tSubTotal + elvaloraSumar;

la pintas en el pie de página

en el afterprint del pie de pagina, la reinicializas a cero:
Código Delphi [-]
tSubTotal := 0;
__________________
online
Responder Con Cita