Button焦点始终聚焦在一个上

~_清_風_~ · 发表于 2013-3-7 16:31:10

马上注册，结交更多好友，享用更多功能^_^

您需要登录才可以下载或查看，没有账号？立即注册

x

比如我有Button1和Button2
如何将焦点始终聚焦在Button2上

wxhnr · 发表于 2013-3-7 19:42:06

如果是按TAB键的时候焦点不停留，只要设置TabStop属性

~_清_風_~ · 发表于 2013-3-8 08:18:52

在FormCreate中
procedure TForm1.FormCreate(Sender: TObject);
begin
ActiveControl := Button2;
end;

在Button1的OnClick事件中
procedure TForm1.Button1Click(Sender: TObject);
begin
ActiveControl := Button2;
end;

这样按下button1后焦点会自动跳到button2上~

账号		自动登录	找回密码
密码			立即注册