Mega Code Archive

 

Categories / Delphi / Examples

 

Gun,ay,yil, saat,dakika,saniye

// 20 Subat 2001 Salı 13 : 30 : 35 gibi tarih saat görüntüleme procedure TForm1.Timer1(Sender: TObject); begin Edit1.Text:=FormatDateTime('dddddd tt',Now); end;