hi,
Put a TTimer and a Label on a form, Set the propertie Interval to 5000 (=5 sec) and put the next code in the OnTimer event:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Caption := DateTimeToStr(now);
end;
Set enabled to True.
Run the application.
Every 5 seconds the time and date will be displayed in label1.
Success,
Steph [Bigglasses]