Hi,
Benötigt werden Label + Timer.
Bei Timer Interval auf 1000 stellen, so wird im Sekundentakt die Uhrzeit angezeigt.
Delphi-Quellcode:
procedure TFrom1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := TimeToStr(Time);
end;
MfG Marc
Marc P.
Grüße aus Kirchheim Teck