|
Usuários |
|
128 Usuários Online
|
|
[Dicas]
Data e Hora atual no form |
Publicado por davidpvilaca : Sábado, Novembro 03, 2007 - 11:56 GMT-3 (3261 leituras)
 2 Comentários  Enviar para um amigo  Versão para impressão
|
Colocar uma barra de status com a data e a hora atuais do sistema, é simples. Veja como, lendo esta dica!
Insira da palheta win32 o componente StatusBar. Dê um duplo clique
sobre a barra de status adicionada e aperte a tecla "Insert" 4 veses, para
inserir
as quebras (você também pode usar o botão direito, Add).
Ajuste a largura (propriedade Width) dos Painéis 0 e 1, respectivamente
para 90 e 100.
Depois disso, vá à palheta System e insira o componente Timer.
Dê um duplo clique sobre ele e
faça o seginte codigo:
begin
StatusBar1.Panels[0].Text := 'Horas: ' + TimeToStr(time);
StatusBar1.Panels[1].Text := 'Data: ' + DateToStr(date);
end;
Pronto! Pode executar e conferir o form!
Dica enviada por david_pvilaca@hotmail.com
|
|
 Comentários | |
| | Comentários pertencem aos seus respectivos autores. Não somos responsáveis pelo seus conteúdos. |
por: karlosrapanui : Nov 05, 2007 - 01:29
(Informações sobre o membro | Enviar uma mensagem)
|
Bacana a dica. Uma outra maneira.
statusbar1.Panels.Items[0].Text := 'Piracicaba, '+ formatdateTime(' dddd ", " dd " de " mmmm " de " yyyy', Now);
|
por: JCJr (josecarlosjr.spam@yahoo.com.br) : Dez 01, 2007 - 12:29
(Informações sobre o membro | Enviar uma mensagem) http://http:// | As dicas anteriores funcionam perfeitamente, só que existe um porêm, se o sistema funcionar 24hs sem interrupção essas informações irão ficar atrasadas em relação a data e hora atual quando passar das 24:00hs. Melhor seria você colocar um componente Timer da Paleta System, colocando o tempo de 1000 ms(1 segundo) e com a propriedade active em True, e toda as vezes que que ele for acionado mande que ele execute o procedimento que se encontra o código citado acima. Se você quiser pode até fazer uma condição onde a hora for 00h:00m:01s seja atualizado as informações, com isso evita-se que as informações da barra de status seja redefinida a cada segundo.
Espero ter ajudado.
José Carlos Jr. |
[ Comentários não permitidos para usuários anônimos. Por gentileza, registre-se ou conecte-se ao sistema
|
|
Edição 112 |
|
|
50 Programas Fontes |
|
|
Produtos |
|
|
