Menampilkan Jam Digital pada Form Delphi

procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Caption := Timetostr(Time());
end;

hasil nya seperti ini di jalankan dan anda bisa kembang kan lagi lebih bagus lagi. . .