Uhrzeit einbinden

[Dagon]

Platziere dazu eine Timerkomponente auf dem Formular und stelle im OI das Intervall auf 1.
Schreibe nun in die OnTimer Methode vom Timer:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Label1.Caption := TimeToStr(Now);
end;

Jetzt wird jede Sekunde die aktuelle Zeit in einem Label ausgegeben.