Ver Mensaje Individual
  #5  
Antiguo 14-01-2015
Avatar de ElKurgan
[ElKurgan] ElKurgan is offline
Miembro Premium
 
Registrado: nov 2005
Posts: 1.235
Reputación: 20
ElKurgan Va camino a la fama
Se puede hacer poniendo en la banda de detalle del QR una etiqueta simple (QRLabel), a la que llamaremos, por ejemplo, qrlblEdad.
Luego capturas el evento "BeforePrint" de la banda de detalle y pones algo como esto (no tengo el Delphi a mano, asi que escribo de memoria ):

Código Delphi [-]
procedure Tform2.qrbDetalleBeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
begin
  // No conozco el nombre de los campos, pero algo así podría servir.
  qrlblEdad.Caption := CalcularEdadCompleta(QReport1.Dataset.FieldByName('Fecha').AsTDateTime);
end;
Eso si, la función debe estar visible para la unit del informe.

Saludos
Responder Con Cita