加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

德尔福 – 聚焦正确的窗口

发布时间:2020-12-15 09:11:56 所属栏目:大数据 来源:网络整理
导读:场景是我有一个’主应用’和’帮助应用’. ‘helper app’弹出一个键盘钩子,它是什么东西,然后重新聚焦主应用程序窗口.问题是,如果主应用程序在帮助程序处于活动状态时弹出模式对话框,然后帮助程序重新关闭错误的窗口,则隐藏模态对话框并且主应用程序显示为
场景是我有一个’主应用’和’帮助应用’. ‘helper app’弹出一个键盘钩子,它是什么东西,然后重新聚焦主应用程序窗口.问题是,如果主应用程序在帮助程序处于活动状态时弹出模式对话框,然后帮助程序重新关闭错误的窗口,则隐藏模态对话框并且主应用程序显示为“冻结”.

有什么策略可以解决这个问题?

解决方法

看起来“主应用程序”的模态形式不属于主应用程序窗口,否则模态形式将始终位于主窗体之上.因此,可能是,它编译的Delphi版本没有MainFormOnTaskbar属性,或者没有设置.然后它必须是拥有窗口的隐藏应用程序窗口.

您可以在关闭“帮助应用程序”表单时测试主应用程序窗口是否被禁用(如果有模式表单则会出现这种情况),并恢复隐藏应用程序窗口所拥有的最后一个活动弹出窗口(如果有).

var
  Wnd: HWND;     // handle to 'main app's main form
  mWnd: HWND;    // handle to possible modal form
  AppWnd: HWND;  // handle to hidden Application window
begin
  ..

  if not IsWindowEnabled(Wnd) then begin  // test if there's a modal form
    AppWnd := GetWindowLong(Wnd,GWL_HWNDPARENT); // TApplication window handle
    mWnd := GetLastActivePopup(AppWnd); // most recently active popup window

      // restore focus to mWnd     

  end else
    // restore focus to Wnd

(当然,不要忘记包含API函数结果的测试.)

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读