Title: Put current time to the titleUse Timer component and this code for onTimer event.procedure TForm1.Timer1Timer(Sender: TObject);begin Form1.Caption:=DateTimeToStr(Now);end;