Examples Delphi

// 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;