[Delphi] Inserindo dat e hora na Status Bar

[mgbcrazy 0]

Primeiro add uma barra de status no form do seu programa da guia Win32 e de um duplo clique sobre ele logo quando abrir uma tela vc aperta o botao insert 3 vezes selecione o primeiro e coloque a propriedade Width para 80, selecione o segundo painel e coloque a propriedade Width para 300, ja pode fechar a janela da barra de status. Logo dps add um Timer da guia System. Deu um duplo clique para abrir a source do componente timer e digite:

StatusBar1.Panels[0].Text := ' ' + FormatDateTime('hh:nn:ss',now); // 13:38:54

StatusBar1.Panels[1].Text := ' ' + FormatDateTime ('dddd", "dd" de "mmmm" de "yyyy',now); //quinta-feira, 4 de junho de 2009

 

Se funcionar ficara assim :

 

 

Creditos: Nao tinham os creditos no tópico ( eu sei q nao foi o autor do topico pq ele eh mto burrin )