Desculpem, esqueci de dizer, use um componente timer e troque a propriedade Interval para 1 (se for usar horas). Usei estes códigos devido a posição da data e hora no meu projeto, claro que tudo varia... Segue: /////////////// //Para data e hora no mesmo Label mas de forma simples, assim: Label1.Caption := DateToStr(Now) + #13 + TimeToStr(Time);
//Somente para data de forma simples: Label1.Caption := DateToStr(Now); //Somente para hora de forma simples: Label1.Caption := TimeToStr(Time); //Ou de uma forma mais completa, assim: label1.caption:= formatdatetime('"Hoje é" dddd"," dd "de" mmmm "de" yyyy " - "',now) + TimeToStr(Time); end; //Mudando comforma necessário a visualização de dias(dddd), mês(mmmm) e ano(yyyy). ///////////////////////// Abraço! .Rafael Souza. emcassio <[EMAIL PROTECTED]> escreveu: Amigo, você poderia estar usando uma statusbar pra ficar mais elegante, ai coloca em seu formulario um componente timer, e no evento ontimer coloca para ele pegar a data e hora do sitema. algo como: componente.propriedade:=datetostr(date)+' '+timetostr(now); espero ter ajudado. Emerson Cassio De:delphi-br@yahoogrupos.com.br Para:"Grupo de Delphi" delphi-br@yahoogrupos.com.br Cópia: Data:Fri, 3 Jun 2005 09:39:42 -0300 Assunto:[delphi-br] Data e Hora > Olá pessoal bom dia tudo bem com vcs ? Preciso colocar data e hora constantes > na tela principal do meu sistema. Alguém sabe uma maneira fácil de se colocar > ? > > Obrigada , > > Taty Santana > > [As partes desta mensagem que não continham texto foram removidas] > > > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > Para ver as mensagens antigas, acesse: > http://br.groups.yahoo.com/group/delphi-br/messages > > Para falar com o moderador, envie um e-mail para: > [EMAIL PROTECTED] ou [EMAIL PROTECTED] > > Links do Yahoo! Grupos > > > > > > > [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] --------------------------------- Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. --------------------------------- Yahoo! Mail: agora com 1GB de espaço grátis. Abra sua conta! [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html