南京舜腾文化干嘛的:如何使一窗口总在最前面不被其它窗口遮住?

来源:百度文库 编辑:神马品牌网 时间:2024/04/27 19:51:05
不论后面打开什么样的窗口,包括放影谍,都不能遮住前面我要使用的某一窗口,请问可以吗?行的话请哪位大侠指点一二,多谢了!
我就是不知道怎么样把这一窗口设置在最前,也更不会使用程序,请各位高手们把最简单的方法详细地说明一下,在下感激不尽!在此,先谢谢各位的关照!

用鼠标点,轻松实现!
哈哈!
什么问题嘛!真八卦!

可以啊!把你的这一个程序设成总保持在最前啊!!!

用编程方法能实现。
写一个程序,调用API函数SetWindowPos设置窗体

我做了一个程序能实现这个功能,加QQ 328304669 我传给你

以下是这个程序的VB核心代码

Private Sub Timer1_Timer()
Static CurrentHwnd As Long
Dim ForegroundWindowHwnd As Long
ForegroundWindowHwnd = GetForegroundWindow
If ForegroundWindowHwnd = CurrentHwnd Then Exit Sub
CurrentHwnd = ForegroundWindowHwnd
If CurrentHwnd <> hwnd Then
SetWindowPos CurrentHwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE
L1.Caption = CurrentHwnd
Else
L1.Caption = ""
End If
If L1.Caption = "" Or L1.Caption = "0" Then
Timer1.Enabled = True
Else
Timer1.Enabled = False
End If
End Sub