Public Type NOTIFYICONDATA
  cbSize As Long
  hwnd As Long
  uID As Long
  uFlags As Long
  uCallbackMessage As Long
  hIcon As Long
  szTip As String * 128
  dwState As Long
  dwStateMask As Long
  szInfo As String * 256
  uTimeoutOrVersion As Long
  szInfoTitle As String * 64
  dwInfoFlags As Long
End Type
 
Public Declare Function Shell_NotifyIcon Lib "shell32.dll" _
  Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, _
  lpData As NOTIFYICONDATA) As Long
 
' NOTIFYICONDATA uFlags Konstanten
Public Const NIF_ICON = &H2
Public Const NIF_MESSAGE = &H1
Public Const NIF_TIP = &H4
Public Const NIF_STATE = &H8 ' Windows 2000
Public Const NIF_INFO = &H10 ' Windows 2000
 
' NOTIFYICONDATA Win2000 dwState Konstanten
Public Const NIS_HIDDEN = &H1
Public Const NIS_SHAREDICON = &H2
 
' NOTIFYICONDATA Win2000 uTimeoutOrVersion Konstanten
Public Const NOTIFYICON_VERSION = &H1
 
' NOTIFYICONDATA Win2000 dwInfoFlags Konstanten
Public Const NIIF_WARNING = &H30
Public Const NIIF_ERROR = &H10
Public Const NIIF_INFO = &H40
 
' Shell_NotifyIcon dwMessage Konstanten
Public Const NIM_ADD = &H0
Public Const NIM_DELETE = &H2
Public Const NIM_MODIFY = &H1
Public Const NIM_SETFOCUS = &H4 ' Windows 2000
Public Const NIM_SETVERSION = &H8 ' Windows 2000