Hola, nose si estas haciendo o no la conversion de la fecha a String, pero si la haces como
TimeToStr funciona:
Código Delphi
[-]
var Hora : TTime;
begin
Hora := Table1.FieldByName('Hora').AsDateTime;
ShowMessage(TimeToStr(hora));
end;
También podes usar la funcion
DecodeTime que te va a entregar la hora, los minutos, los segundos y los milisegundos todo por separado.
Bytes...