relogio no form delphi7

2 label e um ttimer

no ttimer coloque o codigo

label1.caption:=formatdatetime('ddddddd',date):
label2.caption:=formatdatetime('ttttttt',time):