Hay dos funciones, una pa pasar de horas a AnsiString y la inversa, es decir:
Si tienes una hora en un TDateTime, puedes mostrarlo con:
TDateTime hora;
Label1->Caption = TimeToStr(hora);
y si quieres modificar una hora, lo haces con la funcion inversa:
hora = hora + StrToTime("0.30.0");
esto suma media hora
hora = hora + StrToTime("1.0.0");
esto suma una hora
es de memoria, pruebalo y si no lo miro y te lo digo.
Espero q te sirva