Buscar

Colocando hora na barra de títulos dos seus programas delphi.

Código

Crie uma aplicação.
coloque o objeto timer no formulário.
de um duplo clique no objeto timer e coloque o código abaixo no plojeto, entre begin e end;

procedure...................

begin

form1.caption:=TimeToStr(time);

end;

Para colocar a data também escreva deste forma:

procedure .....................

var
tm:string;
dt:string;

begin
tm:=TimeToStr(time);
dt:=DateToStr(Date);
form1.caption:=(tm+dt);
end;

 

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%

Detalhes da dica

Categoria: Data e hora
Adicionada dia: 20/01/07
Por: Marcos
Visualizada: 5331 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009