如何消除TEdit、TDBEdit类控件发出的声音(100分)

ZhangRenping · 2001-11-15

　　我们在TEdit、TDBEdit类控件中输入内容后，当按回车键时往往希望下一个
TEdit、TDBEdit类控件获得焦点，但是在完成任务的同时，往往发出声响，并且
在执行任务之前发出声响，如何消除类控件、TDBE类发出的声音？请各位高手帮帮
兄弟。在此表示感谢了！

sword_liu · 2001-11-15

你不用setfocus就不会有声音了。
; ; ; ; ; key:=#0;
; ; ; ; ; perform(WM_NEXTDLGCTL,0,0);
前提是你的控件的taborder的顺序要设定好。

cbtea · 2001-11-15

在 onkeypress 事件里填写如下代码
begin
; if key=#13 then
; begin
; ; //任务代码.....
; ; key:=#0; ;
; end;
end;

Adnil · 2001-11-15

呵呵，前面两位的程序结合一下就是了。
在 onkeypress 事件里填写如下代码
begin
; if key=#13 then
; begin
; ; key:=#0; ;
; ; perform(WM_NEXTDLGCTL,0,0);
; end;
end;

zhihuali · 2001-11-15

同意cbtea

ZhangRenping · 2001-11-15

谢谢cbtea及各位朋友。