Como faço pra colocar DATA/HORA do Sistema ... ?

Delphi

31/05/2004

Galera, como faço pra colocar a data e a hora do sistema numa StatusBar?

Desde já agradeço!


Tiagoharris

Tiagoharris

Curtidas 0

Respostas

Pedro Bugim

Pedro Bugim

31/05/2004

Tiago,
Primeiro, vc precisa criar dois paineis na StatusBar. Basta clicar com o botão direto do mouse e ir no primeiro tópico do hint que aparecer.
Após criar dois paineis (StatusPanel), vc coloca no evento que quiser, o código para alocar nos mesmos a data e a hora, como descrito abaixo:
Statusbar.Panels[0].text:=DateToStr(Date);
Statusbar.Panels[1].text:=TimeToStr(Time);


ok?!
Espero ter ajudado.
Abraços,
Pedro Bugim


GOSTEI 0
Denis

Denis

31/05/2004

... completando a resposta anterior, vc. pode colocar as duas linhas dentro de um timer, e aí a sua statusbar irá ficar com a data se atualizando automaticamente.


GOSTEI 0
Tiagoharris

Tiagoharris

31/05/2004

Caro Pedro,

fiz o que vc sugeriu, mas a hora do sistema permanece estática... já coloquei no OnCreate do Formulário e no OnShow, e o problema continua.. pq que isso acontece?


GOSTEI 0
Tiagoharris

Tiagoharris

31/05/2004

Ah sim Denis, fiz isso agora, funcionou.

Obrigado Denis e Pedro!

A propósito, Pedro, vc fez o curso de programação da PUC-Rio ?


GOSTEI 0
Pedro Bugim

Pedro Bugim

31/05/2004

fiz.
tu tb fez?!


GOSTEI 0
Tiagoharris

Tiagoharris

31/05/2004

Fiz sim cara, ehehe, por isso que reconheci o seu nome, a gente era da mesma turma, acho


GOSTEI 0
Pedro Bugim

Pedro Bugim

31/05/2004

Caraca! Maneiro! tu chegou a terminar o curso?!
Tá ganhando a vida com programação?!


GOSTEI 0
Peninha

Peninha

31/05/2004

Amigo Thiago esta é a maneira mas simples:
Statusbar.panel[0].text:=FormatDatetime(´HH:MM:SS´,Time);// para Hora
Statusbar.panel[1].text:=FormatDatetime(´DD/MM/YY´,Date);//Para data[code]
qualquer duvida é so falar.



GOSTEI 0
Tiagoharris

Tiagoharris

31/05/2004

Eheheh terminei sim cara, fiz o projeto final em Abril, to programando.... :D


Valeu Peninha, brigado ai pela ajuda


GOSTEI 0
POSTAR