当前位置：文江博客话题详情

如何检查我的应用程序是否具有焦点？

发布于 2024-09-19 05:01:59 字数 68 浏览 3 评论 0原文

我想要做的是检查我的应用程序是否具有焦点，因为如果没有焦点，我将在通知区域上方弹出一个警报窗口，以向最终用户显示一些消息。

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

南风几经秋 2024-09-26 05:01:59

调用 Windows.GetForegroundWindow()，然后将 HWND 传递给 Controls.FindControl() 函数。如果 HWND 属于您的进程，它将返回一个非零的 TWinControl 指针。例如：

if FindControl(GetForegroundWindow()) <> nil then
  // has focus ...
else
  // does not have focus ...

Call Windows.GetForegroundWindow() and then pass the HWND to the Controls.FindControl() function. It will return a non-nil TWinControl pointer if the HWND belongs to your process. For example:

if FindControl(GetForegroundWindow()) <> nil then
  // has focus ...
else
  // does not have focus ...

回复收藏 0 原文

冧九 2024-09-26 05:01:59

D2007 有这个有用的属性

if Application.Active then
//

D2007 has this useful property

if Application.Active then
//

回复收藏 0 原文

薯片软お妹 2024-09-26 05:01:59

如果您的申请由单一表格组成，那么

GetForegroundWindow = Handle

就足够了。当且仅当您的窗体是前台窗口，即键盘焦点属于该窗体上的控件（或窗体本身）时，上面的表达式才成立。

如果您的应用程序由多个表单组成，只需循环遍历它们并检查其中是否有任何一个与 GetForegroundWindow 匹配。

If your application consists of a single form, then

GetForegroundWindow = Handle

will suffice. The expression above is true if and only if the your form is the foreground window, that is, if keyboard focus belongs to a control on this form (or to the form itself).

If your application consists of a number of forms, simply loop through them and check if any of them matches GetForegroundWindow.

回复收藏 0 原文

酸甜透明夹心 2024-09-26 05:01:59

Remys 响应的一个细微变化是：

Var
  Win: TWinControl;
Begin
  Win := FindControl(GetForegroundWindow);
  if Win <> nil then
//      StringGrid1.Row :=5;
//      StringGrid1.SetFocus;

对我来说编译没问题，但我发现它在调试期间不可靠，即使窗口未聚焦导致错误，也会调用 stringgrid.setfocus 。

A slight variation on Remys response is:

Var
  Win: TWinControl;
Begin
  Win := FindControl(GetForegroundWindow);
  if Win <> nil then
//      StringGrid1.Row :=5;
//      StringGrid1.SetFocus;

compiled ok for me, but I found it unreliable during debug, the stringgrid.setfocus is called even when the window isn't focused causing an error.

回复收藏 0 原文

~没有更多了~