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;
 

相关阅读 >>

程序人生 : 30岁，我的程序员梦想

Delphi idhttp最简洁的修改和取得cookie例子

Delphi注册与卸载系统服务

Delphi dbgrid中实现copy、paste功能

Delphi 清空目录以及子目录

Delphi调用wmi读取usb设备的pid和vid

Delphi的对象注销方法destroy和free的区别

Delphi 极速字符串替换函数

Delphi下载官方svn中的示例原码

Delphi 在windows平台下实现进程隐藏

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

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