0

在 Delphi 11 Alexandria 的 Windows 10 中的 32 位 VCL 应用程序中,我有一个TRichEdit控件。(请注意,TRichEditDelphi 11 Alexandria 中的类与以前的 Delphi 版本不同)。

现在,它似乎TRichEdit有一个内置粘贴命令和快捷方式:当我按下 CTRL+V 时,剪贴板内容被插入(图像、格式化文本)。

到目前为止,一切都很好。但是为了允许用户显式粘贴纯文本(即未格式化的文本)——即使剪贴板上有格式化的文本,我也创建了一个“粘贴纯文本”菜单项命令:

procedure TForm1.menuitemPastePlainTextClick(Sender: TObject);
begin
  var ClipboardPlainText := Vcl.Clipbrd.Clipboard.AsText;
  RichEdit1.SelText := ClipboardPlainText;
end;

我已为此命令分配了快捷键 SHIFT+CTRL+V。(此快捷方式在许多应用程序中广泛用于粘贴未格式化的文本)。但是,当我在 RichEdit1 中键入 SHIFT+CTRL+V 时,会粘贴剪贴板中的 FORMATTED 文本!显然,RichEdit1 中的内置 SHIFT+CTRL+V 命令的优先级高于我的自定义快捷方式。

那么,如何摆脱 RichEdit1 中内置的 SHIFT+CTRL+V 命令来粘贴纯文本呢?

4

0 回答 0