Problemas con TTimer

[RoyTan]

Saludos.

Bueno me doy por vencido.

Después de unas cuantas horas intentando hacerlo por mi mismo, he llegado a la conclusión, de que sin la inestimable ayuda del generoso club Delphi, realmente no soy nadie.

Mi problema es el siguiente.

Tengo en un formulario insertado un TTimer y en su evento OnTimer este codigo

StaticText.Caption := TimeToStr(Now);

Hasta aquí todo bien.

Pero resulta que la hora la pone de la siguiente forma

Ejemplo

1:10:30 y yo necesito por razones que me llevarían un buen rato explicar.

01:10:30, necesito poner el cero delante cuando sea 1, 2, 3, 4, 5, 6, 7, 8, 9

y quedaría así 01,02,03,04,05,06,07,08,09

Y cuando sean la 10,11,12,13,14,15,16,17,18,19,20,21,22,23,24 que no ponga el cero.

Estoy intentando utilizar la función Lenght( ), pero nada, no se ni por donde empezar.

¿Sería posible hacer lo que pido?

Gracias.