T tianzhegs Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-05 #1 有多个button如何使焦点定在某一个button上,我只要按空格或回车就可以是那个button 按下
S shenloqi Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-05 #3 什么意思?如果是一开始就让他得到焦点,就设Default := true; 如果是别的按钮也不能按空格或者回车,就在Form的OnShortCut中写事件。
Z zhengbo Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-05 #4 你可以在代码中用Button.SetFocus将焦点设置到指定的Button上
我 我是一条鱼 Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-05 #9 如果有多个按钮: 1、窗口启动 窗口.activecontrol:=button1; 2、程序中 button.setfocus;
H hryyx Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-27 #10 Form1.KeyPreview := True; procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if (Key = VK_SPACE) or (Key = VK_RETURN) then Button1.Click; end;
Form1.KeyPreview := True; procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if (Key = VK_SPACE) or (Key = VK_RETURN) then Button1.Click; end;