以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教：窗口焦点的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=54351)
--  作者：bahamute
--  发布时间：2014/7/26 10:26:00
--  请教：窗口焦点的问题
项目设置了超时锁定窗口，10分钟未操作，就会弹出，输入密码后方可解除，
现在经常遇到一个问题，窗口弹出后，短时间内可以直接输入密码，如果时间略长（电脑也未做其它操作），这时窗口还在最上层，密码文本框的输入符也一闪一闪，但键盘输入的字符却无效，（应该是窗口会失去焦点），必须点击一次窗口，再输入一遍，小问题，但很遭人吐槽。
请教，如何使锁定窗口始终保持当前窗口？
[此贴子已经被作者于2014-7-26 10:27:09编辑过]
--  作者：Bin
--  发布时间：2014/7/26 10:28:00
--  
是否一直在启动窗口或者执行其他东西,所以才一闪一闪的. 上个例子看看
--  作者：bahamute
--  发布时间：2014/7/26 11:09:00
--  
如图，我的判断就是窗口非当前窗口，所以输入的密码才未显示到文本框，
现在想知道如何用代码将窗口始终保持为当前窗口就行。


图片点击可在新窗口打开查看此主题相关图片如下：clip_4.jpg
图片点击可在新窗口打开查看
--  作者：Bin
--  发布时间：2014/7/26 11:13:00
--  
设置topmoust=true 看看
--  作者：bahamute
--  发布时间：2014/7/26 11:36:00
--  
这句代码放在那里？

VB当中，让指定句柄的窗口成为当前活动窗口的代码如下，FT中如何引用

Private Declare Function SetForegroundWindow Lib "user32" Alias "SetForegroundWindow" (ByVal hwnd As Long) As Long

[此贴子已经被作者于2014-7-26 12:24:45编辑过]
--  作者：Bin
--  发布时间：2014/7/26 14:23:00
--  
放到全局代码