Ver Mensaje Individual
  #1  
Antiguo 24-01-2008
Avatar de RoyTan
RoyTan RoyTan is offline
Miembro
 
Registrado: oct 2003
Ubicación: Mijas - Málaga
Posts: 121
Reputación: 21
RoyTan Va por buen camino
Problemas con TTimer

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.
Responder Con Cita