delphi - 显示多个表单时如何避免设置焦点？

Question

首先，这个问题是我对另一个问题的回答继续的......

假设我正在使用这个特殊的解决方案在任何给定的窗口周围放置一个框架。如何在不将焦点转移到这些框架形式的情况下使焦点保持焦点的位置？目前，我必须打电话SetFocus来设置任何东西，但是，然后窗户会出现故障并且显示不正确。

无论这 4 个边框形式如何显示，我如何确保焦点表单始终保持焦点？

score 0 · Accepted Answer

不用直接显示程序（FTop.Show）来显示边缘窗口，而是使用显示窗口而不激活：

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

1 回答 1