我学Delphi心得与笔记-------在控件上如何禁用Ctrl+V
项目中用到一个TJamShellList组件,此组件实现绑定查询图片,发现在使用Ctrl+C的同时也可以使用Ctrl+V结果将一个图处复制了多份,这样就不行了:(
于是,想了一个办法,禁用了Ctrl+V组合按键,代码如下:
//在KeyDown事件中写如下代码
【我学Delphi心得与笔记-------在控件上如何禁用Ctrl+V】procedure TFrmPictureBrowse.lstPictureKeyDown(Sender: TObject;
var Key: Word;
Shift: TShiftState);
begin
if(ssctrl in shift)and(key = $56)then
begin
Key := 0;
end;
end;
这样就能禁用Ctrl+V组合按钮的功能
转载于:https://www.cnblogs.com/youshan/archive/2012/02/17/2355583.html
推荐阅读
- 第326天
- 2018-07-27读书心得
- 呼吸练习心得
- 高三党心得体会
- 營銷策劃心得體會(終)
- 08黑龙江迟淑荣弯柳树网络学院第五期学习赵宗瑞老师主讲的(传统文化与身心健康)教育体系心得体会
- 程序员客栈TOP收入的萌系开发者心得|程序员客栈TOP收入的萌系开发者心得 - 雨晴
- 两个心得
- 2018-02-08|2018-02-08 P101-P112学习心得
- 我学会了煎牛排