Можете превести код вот это пункта меню
Код:
procedure TForm1.N1Click(Sender: TObject);
begin
Memo1.Lines.Add(TimeToStr(Now));
Memo1.Lines.Add(DateToStr(Now));
end;
код сверху непомогает! в блокноте windows время и дата вставляються по другому
вот так в блокноте windows:
а с кодом сверху получаеться вот так:
