In einer Action mit dem ShortCut F5 kannst du die Funktionalität von NotePad nachbilden, wenn du Davids Code etwas umbaust:
Delphi-Quellcode:
procedure TDemoForm.DateInsertExecute(Sender: TObject);
begin
with DateTimePicker do
begin
// Format := 'hh:mm yyyy-MM-dd';
RichEdit.SelText := FormatDateTime(Format, DateTime);
end;
end;
Grüße vom marabu