Button焦点始终聚焦在一个上
比如我有Button1和Button2如何将焦点始终聚焦在Button2上
如果是按TAB键的时候焦点不停留,只要设置TabStop属性 在FormCreate中
procedure TForm1.FormCreate(Sender: TObject);
begin
ActiveControl := Button2;
end;
在Button1的OnClick事件中
procedure TForm1.Button1Click(Sender: TObject);
begin
ActiveControl := Button2;
end;
这样 按下button1后焦点会自动跳到button2上~
{:5_108:}
页:
[1]