Hola,
Tal vez no te parezca mal usar un componente de nombre TimeForm que puedes encontrar en el paquete DecComp, el cual puedes encontrar a su vez en la
sección de componentes de esta misma página Web. Queda que limarle algunas cosillas (digo a TimeForm), pero, puede que te dé ciertas ideas o te sirva, directamente, para lo que pretendes.
Por otro lado revisa
este Hilo, que tal vez también te pueda resultar útil.