【分享】马大哈系列功能模块----总在最前(VB6代码)

马大哈 · 发表于 2009-7-5 07:59:44

简单的封装,使用方便.

一个函数:

Public Sub OnTop(ByVal tForm As Form, Optional ByVal top As Boolean = True, Optional TouMing As Long = 255, Optional cMouse As Boolean = False)
'*************************************************************************
'**参数名：Top
'**说明：是否将窗体放到Z轴最上层
'**参数名：TouMing
'**说明：窗体透明度(WIN2000及以上有效)
'**参数名：cMouse
'**说明：鼠标是否能穿透
'*************************************************************************

复制代码

使用:

复制代码

8x48f3S5.bas (2.6 KB, 下载次数: 25362)

loverosebay · 发表于 2009-7-5 20:12:31

<p>下下来看看这个和 show 1 有什么不同,呵呵..</p>

andyliang007008 · 发表于 2010-8-12 16:09:44

这个和API的有什么不同？

马大哈 · 发表于 2011-1-6 10:26:06

与API的一样,本来也就是API的封装,HOHO.

只是因为封装好了,使用方便而已,省事.

lwy7758 · 发表于 2011-4-25 20:40:39

谢谢老马了

lwy7758 · 发表于 2011-4-26 12:07:42

哎再下一次好...

马大哈 · 发表于 2011-4-26 12:32:00

回复 lwy7758 的帖子

没下成功?

xxhaishixx · 发表于 2011-8-6 18:53:08

不错

yxd199512041 · 发表于 2011-8-11 21:47:26

可找到了！！！！！！！！！！！！！！
那次和你聊天你还说没有，终于找到了！！

yxd199512041 · 发表于 2011-8-11 22:14:27

请问“Z轴”什么意思？是指屏幕的前后层吗？
我编译程序后，却不能显示在任务管理器窗口之上，出什么错误了吗？(winXP)

luorl · 发表于 2012-8-13 21:31:49

谢谢分享，非常不错！

wszjljx · 发表于 2012-8-21 01:28:35

要显示在任务管理器前需要用Timer控件设定Interval值为1 不断执行此函数才行...... 应该是封装了一个SetWindowPos......

账号		自动登录	找回密码
密码			加入我们