Delphi 禁用TEdit右键菜单及复制粘贴

本文整理自网络，侵删。

 Delphi 禁用TEdit右键菜单及复制粘贴简的单方法如下：
1)  设置TEdit的ReadOnly 属性为True 
     Edit1.ReadOnly := True;
2)  在TEdit的OnContextPopup中使Handled := True

procedure TFrmReport.Edit1ContextPopup(Sender: TObject; MousePos: TPoint;
  var Handled: Boolean);
begin
  Handled := True;
end;
 

相关阅读 >>

Delphi unigui unistringgrid1 清空

Delphi 使用 tedgebrowser 组件

Delphi 获取listbox1的行值

Delphi 截取两个字符之间的内容

Delphi 10.4中新增功能：新的vcl tedgebrowser组件

Delphi tgpimage 把图像转存为其他格式

Delphi (user agent) of a twebbrowser

Delphi 实现显示文件目录大小

Delphi adoconnection1 连接excel 读取数据

Delphi中利用中断获得系统启动以来的时间

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 禁用TEdit右键菜单及复制粘贴