delphi禁止TEdit, TMemo右键上下文弹出菜单

本文整理自网络，侵删。

 delphi禁止TEdit, TMemo右键上下文弹出菜单

procedure TForm1.Edit1ContextPopup(Sender: TObject;MousePos: TPoint;var Handled: Boolean) ;
begin
//disable default context popup
Handled := True;
end;

 

相关阅读 >>

Delphi ile dataset to xml

Delphi 自带大小写转换

Delphi 的内存操作函数(2): 给数组指针分配内存

Delphi 搜索字符串在流中的位置

Delphi tcomport控件从串品读取数据

Delphi firedac 获取mysql 数据库databases 列表

Delphi treeview �c 自动给标题上加图片

Delphi getprocessisadmin()判断exe是否以管理员身份启动

Delphi case 语句中使用字符串

Delphi 错误no ftp list parsers have been registered

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

转载请注明出处：木庄网络博客 » delphi禁止TEdit, TMemo右键上下文弹出菜单