Ver Mensaje Individual
  #5  
Antiguo 17-09-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Reputación: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Puedes utilizar un componente "TTimer". Lo encontrarás en la pestaña "System" de la paleta de componentes de Delphi. Añade uno al formulario en que quieras mostrar un "TLabel" con la fecha y hora actuales. De forma predeterminada el "TTimer" disparará su evento "OnTimer" cada 1000 milisegundos, esto es, cada segundo. Creo que ya eso tal cual puede valerte. ¿Qué tienes que hacer, pues? Aprovechar el evento "OnTimer" del componente "TTimer", únicamente. En este evento es en donde has de aprovechar para mantener actualizada el "TLabel" oportuno con la fecha y hora actuales.

Adjunto un sencillo ejemplo donde podrás ver una forma de implementar lo que he comentado arriba. Por otro lado reconocer un error mío: resulta que la función "FormatDateTime" no está en la unidad "DateUtils", sino en la unidad "SysUtils". En todo caso, en la unidad "DateUtils" se hallan no pocas funciones para trabajar con fechas y horas, como dije antes.
Archivos Adjuntos
Tipo de Archivo: zip ejemplo.zip (1,9 KB, 49 visitas)
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita