Como Visualizar un reloj dentro de una ficha
Hola foro, una consulta , como puedo hacer para visualizar el reloj de windows en forma constante dentro de una ficha .
yo intente esto: Cree una variable privada tipo boolean Private swith :Boolean; En el evento oncreate del form hice: Swith :=True; En el evento onActive del form hice: while Swith =True do Begin lblFecha.caption=timeToStr(Time); Application.ProcessMessages end; Al ejecutar el programa ,visulizo la hora , pero me bloquea las opciones que posee el formulario, Existe alguna otra manera de lograr imprimir la hora o derrepente algun componente que pueda utilizar. Gracias de antemano. |
Pon un label y un objeto TTimer en la ventana.
Al timer ponle un interval de 1000 y en el evento OnTimer escribe:
Pon la propiedad Active a True de tu Timer y listo. Probablemente necesites el uses DateUtils, revisa las opciones de FormatDateTime. Un saludo |
Muchas Gracias amigo, ya solucione el problema con tu ayuda :D
|
La franja horaria es GMT +2. Ahora son las 16:04:50. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi