[M.i.d.n.i.g.h.t Software]

Можете превести код вот это пункта меню

Код:

procedure TForm1.N1Click(Sender: TObject);
begin
  Memo1.Lines.Add(TimeToStr(Now));
  Memo1.Lines.Add(DateToStr(Now));
end;

код сверху непомогает! в блокноте windows время и дата вставляються по другому

вот так в блокноте windows:

а с кодом сверху получаеться вот так: