如何点击Button时不让其获得焦点

Question

在form1上有一个Tedit控件和一个Tbuton控件，在button1.onclick事件里有keybd_Event(...)输入字符，光标原来是在edit1上的。但是点击button1后光标就消失了，有什么方法点击button1时eidt1上的光标不消失？（不想用Tspeedbutton代替Tbutton,Tspeedbutton太丑了）

Answer 1

可以在点击事件最后加上：Edit1.SetFocus;

Answer 2

speedbutton是不会留焦点的，怎么会太丑？处理办法楼上说了

Answer 3

请大家亲自动手实验了再发言 setfocus早就试过了

Answer 4

额没看到keybd_Event(...) 我再试试……