В закладке System находится компонент Timer, кидаешь его на форму. В инспекторе объектов появятся свойства таймера: Interval указывает время задержки в мс. В том же инспекторе переходишь на закладку Events находишь метод OnTimer и кликаешь на соседнюю клетку 2 раза, далее пишешь
Код:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Caption := TimeToStr(Time); // каждую секунду в заголовок окна будет выводится текущее время
end;