3

如何阻止 TRichEdit 中的拖放?delphi 代码我使用 Rich Edit 并在阻止拖放功能方面遇到困难,特别是从表单外部拖动文本让我们说从 IE 到我的 RichEdit。

4

2 回答 2

3

请参阅MSDN 上的RevokeDragDrop

uses
  activex;

RevokeDragDrop(RichEdit1.Handle);
于 2010-07-05T09:05:22.983 回答
2

尝试更改按键向下/向上事件,将其设置为只读。onkey down,将其设置为 richedit1.readonly := false; 然后在 keyup richedit1.readonly := true; 它有效..它曾经禁用粘贴功能

于 2010-07-05T08:32:09.360 回答