网页功能: 加入收藏 设为首页 网站搜索  
制作TopMost窗口
发表日期:2005-06-08作者:[转贴] 出处:  

制作TopMost窗口很简单,只需一个API函数就可以实现。
下面的例子就实现了这个功能。
>>步骤1----建立新工程,在窗体上放置一个CommandButton按钮。
>>步骤2----编写如下代码:

Private Const SWP_NOSIZE = &H1
Private Const SWP_NOMOVE = &H2
Private Const HWND_TOPMOST = -1
Private Declare Function SetWindowPos Lib \"user32\" ( _
ByVal hwnd As Long,ByVal hWndInsertAfter As Long, _
ByVal X As Long,ByVal Y As Long, _
ByVal cx As Long, ByVal cy As Long, _
ByVal wFlags As Long) As Long

Private Sub Command1_Click()
SetWindowPos hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE _
Or SWP_NOSIZE
End Sub

>>步骤3----编译运行,点击Command1,看看是不是始终位于最上层。
要去掉TopMost属性,只要将参数HWND_TOPMOST换成HWND_NOTOPMOST,
当然,得说明常量:HWND_NOTOPMOST = -2

我来说两句】 【加入收藏】 【返加顶部】 【打印本页】 【关闭窗口
中搜索 制作TopMost窗口
本类热点文章
  在VB中使用WMI获取系统硬件和软件有关信..
  将繁体中文字转化成简体中文
  获取CPU的ID
  在vb程序中如何获取剪贴板中所复制的文..
  更新桌面图片
  VB编程破解Windows屏幕保护密码
  让程序的鼠标支持滚轮
  用VB创建Windows快捷方式(无需DLL)
  用vb调用系统输入法
  用VB制作IE工具条自定义按钮
  修改显示器的刷新频率
  vb实现多线程
最新分类信息我要发布 
最新招聘信息

关于我们 / 合作推广 / 给我留言 / 版权举报 / 意见建议 / 广告投放  
Copyright ©2003-2019 Lihuasoft.net webmaster(at)lihuasoft.net
网站编程QQ群   京ICP备05001064号 页面生成时间:0.00328