显示多个表单时如何避免设置焦点?

时间:2013-06-26 07:34:11

标签: delphi focus

首先,我在another question ...

的答案中继续提出这个问题

假设我正在使用此特定解决方案在任何给定窗口周围放置一个框架。如何将焦点形式保持焦点而不将焦点转移到这些框架形式?目前,我不得不打电话给SetFocus来设置任何东西,但是,那么窗户会出现故障并且显示不正确。

无论这四种边框形式如何显示,我怎样才能确保焦点形式始终保持焦点?

1 个答案:

答案 0 :(得分:0)

不使用直接显示过程(FTop.Show)显示边窗口,而是使用不激活的显示窗口:

ShowWindow(FTop.Handle, SW_SHOWNOACTIVATE);
FTop.Visible := True;

Daniel Rikowski写了here