Ir para conteúdo
Fórum Script Brasil
  • 0

Adiocionar "relógio" Ao Programa


deio

Pergunta

5 respostass a esta questão

Posts Recomendados

  • 0

Opa

Coloque um TTimer no seu Form, coloque o Interval dele pra 500...

Mas porque 500?

Porque o TTimer trabalha com milisegundos, ou seja, se você quisesse 1 segundo

você iria colocar 1000, pra 2 segundos 2000 e por ai vai, então 500 é metade de um

segundo certo, o que vai fazer seu relógio ser preciso com a hora!

No evento OnTimer do TTimer você faz exemplo

statusbar.panel[0].text := FormatDateTime('hh:mm:ss', Now);

Sendo que:

hh = Hora

mm = minuto

ss = segundos

Então se você não quiser deixar os segundos basta tirar o :ss

Mas acho conveniente você criar paineis dentro da Statusbar...

Espero que seja isto!

abraço

Editado por Micheus
Adicionado índice da propriedade panel - em destaque.
Link para o comentário
Compartilhar em outros sites

  • 0

Ai galera eu consegui colocar um relógio com o seguinte comando

Statusbar1.Panels[0].text := timetostr (now);

Com o comando que o parceiro mandou ele dava erro.

Teste e veja se pra você funciona.

valeu Galera

Link para o comentário
Compartilhar em outros sites

  • 0
Guest --Marcos --
Ai galera eu consegui colocar um relógio com o seguinte comando

Statusbar1.Panels[0].text := timetostr (now);

Com o comando que o parceiro mandou ele dava erro.

Teste e veja se pra você funciona.

valeu Galera

O outro comando deu erro pois o correto para hora é "hh:nn:ss" e não "hh:mm:ss"

Observe que "nn" é minuto e "mm" é mês!

Link para o comentário
Compartilhar em outros sites

  • 0
Guest --Marcos --

Tentem o código abaixo e comentem

procedure TForm1.Timer1Timer(Sender: TObject);

begin

sb1.Panel[0].Text := FormatDateTime('hh:nn:ss', now);

end;

Lembre-se, se houver uma ou mais divisões do StatusBar, a nomenclatura e número da divisão mudam, de acordo com o que utilizam.

Ex abaixo com o código anterior:

procedure TForm1.Timer1Timer(Sender: TObject);

begin

sb1.Panels[3].Text := FormatDateTime('hh:nn:ss', now);

end;

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,8k
×
×
  • Criar Novo...