Si lo que usas es QReport, intenta poner esto en el evento onPrint del TQRLabel
------------------
procedure TFQReport.QRLHoraPrint(sender: TObject; var Value: String);
begin
try
Value := FormatDateTime('hh:mm',Fecha);
except
Value := Value;
end;
end;
-------------------
espero haberte sido de ayuda.
cioa
SALO!!
__________________
De donde sacara las pelas la luna para salir todas las noches!!!
P.D. La mala gente gobierna por que la buena gente no vota.
En españa eso ya no pasa....
|