打印本文 打印本文 关闭窗口 关闭窗口
VB托盘程序详解
作者:武汉SEO闵涛  文章来源:敏韬网  点击数797  更新时间:2009/4/23 14:59:13  文章录入:mintao  责任编辑:mintao

  很多软件运行时会在系统托盘区(就是桌面右下角显示时间的区域)出现一个小图标,它作为程序运行的一个标志,我们可以通过使用小图标所弹出的菜单来控制应用程序的状态。本例就给出了一个功能比较完整的托盘程序,我们可以看到怎样用API函数Shell_NotifyIcon来添加、删除、更改托盘图标;而且例中还演示了为托盘图标添加右键菜单和浮动提示的方法。

  程序(附后)用到了Shell_NotifyIcon、SendMessage、CallWindowProc、SetWindowLong等API函数,其中Shell_NotifyIcon是主要的函数,它用来添加、删除、更改系统托盘区(taskbar status area)的图标,所以我们先来看看这个函数的声明和参数:

  使用API函数之前必须先在程序中声明如下:

Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, lpData As NOTIFYICONDATA) As Long
  
  其中各参数的意义如下表:

参数: 意义 dwMessage 为消息设置值,它可以是以下的几个常数值:0、1、2 NIM_ADD = 0  加入图标到系统状态栏中 NIM_MODIFY = 1 修改系统状态栏中的图标 NIM_DELETE = 2 删除系统状态栏中的图标
  LpData 用以传入NOTIFYICONDATA数据结构变量,其结构如下所示:

Type NOTIFYICONDATA

  cbSize As Long        需填入NOTIFYICONDATA数据结构的长度
  HWnd As Long         设置成窗口的句柄
  Uid As Long         为图标所设置的ID值
  UFlags As Long        设置uCallbackMessage,hIcon,szTip是否有效
  UCallbackMessage As Long   消息编号
  HIcon As Long         显示在状态栏上的图标
  SzTip As String * 64     提示信息
End Type
  返回值 Long,非零表示成功,零表示失败

  在使用这个API函数之前我们应该先定义结构类型NOTIFYICONDATA:

Public Type NOTIFYICONDATA
     cbSize As Long HWnd As Long
     Uid As Long UFlags As Long
     UCallbackMessage As Long
     HIcon As Long
     SzTip As String * 64
   End Type
  然后定义一个NOTIFYICONDATA的变量TheData来记录设置托盘图标的数据

Private TheData As NOTIFYICONDATA

打印本文 打印本文 关闭窗口 关闭窗口