请教各位高手 怎样屏蔽掉Memo控件的键盘事件
请教各位高手 怎样屏蔽掉Memo控件的键盘事件 问题点数：0、回复次数：6Top
1 楼spiderzzl（秋月无边）回复于 2004-04-04 08:42:51 得分 0
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
begin
key:=#0;
end;Top
2 楼spiderzzl（秋月无边）回复于 2004-04-04 08:43:57 得分 0
新来的啊，不给分还起那么多帖子Top
3 楼xiaosq2008（挂在空中的鱼）回复于 2004-04-04 08:49:14 得分 0
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
begin
key:=#0;
end;
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
begin
key:=#0;
end;Top
4 楼redlegend_126_com（redlegend）回复于 2004-04-04 09:07:32 得分 0
在keypress事件中：
key:=#0;//什么键盘都不响应
答案满意么Top
5 楼MDS2004（xuyan）回复于 2004-04-05 10:00:06 得分 0
谢谢各位大哥，小弟这就去实施看一下。我是新来的
。Top
6 楼MDS2004（xuyan）回复于 2004-04-05 10:19:57 得分 0
嘿嘿，各位大哥，小弟刚才 去试了一下。不行呀
PageDown & PageUp 事件还是没有被蔽掉。怎么办？〉
Top
