Examples Delphi

  1. Home
  2. Delphi
  3. Examples
  4. Formatlı tarih ve saat gösterimi
procedure TForm1.Timer1Timer(Sender: TObject);
var zaman:tDateTime;
begin
edit1.text:=FormatDateTime('d mmmm yyyy dddd hh:nn:ss:zzz am/pm',Date+Time);
end;