求个C语言写的系统托盘图标代码

//代码适用于VC2008～2019

#include <windows.h>

#define IDR_PAUSE 12

#define IDR_START 13

LPCTSTR szAppClassName  = TEXT("服务程序")

LPCTSTR szAppWindowName = TEXT("服务程序")

HMENU hmenu//菜单句柄

LRESULT CALLBACK WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)

{

    NOTIFYICONDATA nid

    UINT WM_TASKBARCREATED

    POINT pt//用于接收鼠标坐标

    int xx//用于接收菜单选项返回值

    // 不要修改TaskbarCreated，这是系统任务栏自定义的消息

    WM_TASKBARCREATED = RegisterWindowMessage(TEXT("TaskbarCreated"))

    switch (message)

    {

    case WM_CREATE://窗口创建时候的消雀氏息.

        nid.cbSize = sizeof(nid)

        nid.hWnd = hwnd

        nid.uID = 0

        nid.uFlags = NIF_ICON | NIF_MESSAGE | NIF_TIP

        nid.uCallbackMessage = WM_USER

        nid.hIcon = LoadIcon(NULL, IDI_APPLICATION)

        lstrcpy(nid.szTip, szAppClassName)

        Shell_NotifyIcon(NIM_ADD, &nid)

        hmenu=CreatePopupMenu()//生成菜单

        AppendMenu(hmenu,MF_STRING,IDR_PAUSE,L"暂停服务")//为菜单添加两个选项

        AppendMenu(hmenu,MF_STRING,IDR_START,L"关于")

        break

    case WM_USER://连续使用该程序时候的消息.

        if (lParam == WM_LBUTTONDOWN)

            MessageBox(hwnd, TEXT("Win32 API 实现系统托盘程序,双击托盘可以退出!"), szAppClassName, MB_OK)

        if (lParam == WM_LBUTTONDBLCLK)//双击托盘的消息,退出.

            SendMessage(hwnd, WM_CLOSE, wParam, lParam)

        if (lParam == WM_RBUTTONDOWN)

        {

            GetCursorPos(&pt)//取鼠标坐标

            ::SetForegroundWindow(hwnd)//解决在菜单外单击左键菜单不消失的问题

            EnableMenuItem(hmenu,IDR_PAUSE,MF_GRAYED)//让菜单中的某一项变灰

 颂芹           xx=TrackPopupMenu(hmenu,TPM_RETURNCMD,pt.x,pt.y,NULL,hwnd,NULL)//显示菜单并获取选项ID

            if(xx==IDR_PAUSE) MessageBox(hwnd, TEXT("111"), szAppClassName, MB_OK)

            if(xx==IDR_START) MessageBox(hwnd, TEXT("222"), szAppClassName, MB_OK)

            if(xx==0) PostMessage(hwnd,WM_LBUTTONDOWN,NULL,NULL)

            //MessageBox(hwnd, TEXT("右键"), szAppName, MB_OK)

        }

        break

    case WM_DESTROY://窗口销毁时候的消息.

        Shell_NotifyIcon(NIM_DELETE, &nid)

        PostQuitMessage(0)

        break

    default:

        /*

        * 防止当Explorer.exe 崩溃以后，程序在系统系统托盘中的图标就消失

        *

        * 原理：Explorer.exe 重新载入后会重建系统任务栏。当系统任务栏建立的时候会向系统内所有

        * 注册接收TaskbarCreated 消息的顶级窗口发送一条消息，我们只需要捕捉这个消息，并重建系

        * 统托盘的图标即顷樱散可。

        */

        if (message == WM_TASKBARCREATED)

            SendMessage(hwnd, WM_CREATE, wParam, lParam)

        break

    }

    return DefWindowProc(hwnd, message, wParam, lParam)

}

int main()

{

    HWND hwnd

    MSG msg

    WNDCLASS wndclass

    HWND handle = FindWindow(NULL, szAppWindowName)

    if (handle != NULL)

    {

        MessageBox(NULL, TEXT("Application is already running"), szAppClassName, MB_ICONERROR)

        return 0

    }

    wndclass.style = CS_HREDRAW | CS_VREDRAW

    wndclass.lpfnWndProc = WndProc

    wndclass.cbClsExtra = 0

    wndclass.cbWndExtra = 0

    wndclass.hInstance = NULL

    wndclass.hIcon = LoadIcon(NULL, IDI_APPLICATION)

    wndclass.hCursor = LoadCursor(NULL, IDC_ARROW)

    wndclass.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH)

    wndclass.lpszMenuName = NULL

    wndclass.lpszClassName = szAppClassName

    if (!RegisterClass(&wndclass))

    {

        MessageBox(NULL, TEXT("This program requires Windows NT!"), szAppClassName, MB_ICONERROR)

        return 0

    }

    // 此处使用WS_EX_TOOLWINDOW 属性来隐藏显示在任务栏上的窗口程序按钮

    hwnd = CreateWindowEx(WS_EX_TOOLWINDOW,

        szAppClassName, szAppWindowName,

        WS_POPUP,

        CW_USEDEFAULT,

        CW_USEDEFAULT,

        CW_USEDEFAULT,

        CW_USEDEFAULT,

        NULL, NULL, NULL, NULL)

    ShowWindow(hwnd, 0)

    UpdateWindow(hwnd)

    //消息循环

    while (GetMessage(&msg, NULL, 0, 0))

    {

        TranslateMessage(&msg)

        DispatchMessage(&msg)

    }

    return 0

}

在Windows *** 作系统中 任务栏的右边(托盘)会常驻几个图标 如输入法切换图标 音量控制图标等 此外我们还经常遇到具有托盘图标的软件 如金山词霸 实时监测功能的杀毒软件等 这些软件在后台运行 通常不占用太多的屏幕资源 只在通知栏上放一个小小的标志 必要时我们可以通过用鼠标点击图标对其进行选单 *** 作或激活其主窗口 有时我们自己编写的程序也希望有类似的效果 本文将详细地介绍用VC设计托盘图标程序的方衫游备法 一 NOTIFYICONDATA结构 NOTIFYICONDATA结构包含了系统用来处理托盘图标的信息 它包括选择的图标 回调消息 提示消息和图标对应的窗口等内容 其定义为 typedef struct—NOTIFYICONDATA { DWORD cbSize//以字节为单位的这个结构的大小 HWND hWnd//接收托盘图标通知消息的窗口句柄 UINT uID//应用程序定义的该图标的ID号 UINT uFlags//设置该图标的属性 UINT uCallbackMessage//应用程序定义的消息ID号 此消息传递给hWnd HICON hIcon//图标的句柄 char szTip[ ]//鼠标停留在图标上显示的提示信息 } NOTIFYICONDATA ?PNOTIFYICONDATA该结构中 成员uFlags可以是下列的组合或其中之一 NIF_ICON 设置成员hIcon有效 NIF_MESSAGE 设置成员uCallbackMessage有效 NIF_TIP 设置成员szTip有效 二 Shell_NotifyIcon函数 全局函数Shell_NotifyIcon()用于在托盘上增加 删除或修改图标 其原型为 WINSHELLAPI BOOL WINAPI Shell_NotifyIcon( DWORD dwMessage PNOTIFYICONDATA pnid)Pnid是上面的NOTIFYICONDATA结构磨烂的指针 dwMessage是被传递的消息 可以是以下消息之一 NIM_ADD 增加图标 NIM_DELETE 删除图标 NIM_MODIFY 修改图标 三 托盘图标程序设计示例 首先我们用AppWizard创建一个不基于文档和视图结构的应用程序Tray 我们并不想在应用程序启动时显示主窗口 所以需要删除应用程序类CTrayApp中成员函数InitInstance()的以下两句代码 pFrame 〉ActivateFrame()pFrame 〉ShowWindow(SW_SHOW)在CMainFrame类中加入NOTIFYICONDATA结构的保护成员变量m_tnid 并在其OnCreate函数中return语句前加入生成托盘图标的代码 m_tnid cbSize=sizeof(NOTIFYICONDATA)m_tnid hWnd=this 〉m_hWndm_tnid uFlags=NIF_MESSAGE|NIF_ICON|NIF_TIPm_tnid uCallbackMessage=MYWM_NOTIFYICON

//用户定义的回调消息 CString szToolTipszToolTip=_T( 托盘图标实例 )_tcscpy(m_tnid szTip szToolTip)m_tnid uID=IDR_MAINFRAMEHICON hIconhIcon=AfxGetApp() 〉LoadIcon(IDR_MAINFRAME)m_tnid hIcon=hIcon::Shell_NotifyIcon(NIM_ADD &&m_tnid)if(hIcon)::DestroyIcon(hIcon)返回消息的ID应在主或毁框架类的头函数中定义 #define MYWM_NOTIFYICON WM_USER+ 为了处理图标返回消息 如鼠标左键双击 鼠标右键单击消息 我们重载WindowProc()函数 此外 我们还希望在主框架窗口最小化时图标不在任务栏的空白区出现 在此函数中同时作相应处理 LRESULT CMainFrame::WindowProc(UINT message WPARAM wParam LPARAM lParam) { switch(message){ case MYWM_NOTIFYICON: //如果是用户定义的消息 if(lParam==WM_LBUTTONDBLCLK){ //鼠标双击时主窗口出现 AfxGetApp() 〉m_pMainWnd 〉ShowWindow(SW_SHOW)} else if(lParam==WM_RBUTTONDOWN){ //鼠标右键单击d出选单 CMenu menumenu LoadMenu(IDR_RIGHT_MENU)//载入事先定义的选单 CMenu?pMenu=menu GetSubMenu( )CPoint posGetCursorPos(&&pos)pMenu 〉TrackPopupMenu(TPM_LEFTALIGN|TPM_RIGHTBUTTON pos x pos y AfxGetMainWnd())} breakcase WM_SYSMAND: //如果是系统消息 if(wParam= =SC_MINIMIZE){ //接收到最小化消息时主窗口隐藏 AfxGetApp() 〉m_pMainWnd 〉ShowWindow(SW_HIDE)return } break} return CFrameWnd::WindowProc(message wParam lParam)} 为使应用程序退出时图标消失 映射WM_DESTROY消息 在OnDestroy()函数中加入 ::Shell_NotifyIcon(NIM_DELETE &&m_tnid)至此 托盘图标程序的常规功能我们均已实现 我们还可以通过Shell_NotifyIcon()函数的调用实现不同状态下图标的改变 本程序在VC++ Windows / Professional下调试通过 lishixinzhi/Article/program/net/201311/11634

分类: 电脑/网络 >>程序设计 >迅毕>其他编程语言

解析:

api函数shell_notifyicon

1、新建立一个VB6工程，将Form1的ShowInTaskBar属性设置为False

2、菜单：工程--添加模块 按“打开”这样就添加了一个新模块，名为Module1,保存者洞为Module1.bas

3、在Module1中写下如下代码：亩嫌芹

Option Explicit

Public Const MAX_TOOLTIP As Integer = 64

Public Const NIF_ICON = &H2

Public Const NIF_MESSAGE = &H1

Public Const NIF_TIP = &H4

Public Const NIM_ADD = &H0

Public Const NIM_DELETE = &H2

Public Const WM_MOUSEMOVE = &H200

Public Const WM_LBUTTONDOWN = &H201

Public Const WM_LBUTTONUP = &H202

Public Const WM_LBUTTONDBLCLK = &H203

Public Const WM_RBUTTONDOWN = &H204

Public Const WM_RBUTTONUP = &H205

Public Const WM_RBUTTONDBLCLK = &H206

Public Const SW_RESTORE = 9

Public Const SW_HIDE = 0

Public nfIconData As 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 * MAX_TOOLTIP

End Type

Public Declare Function ShowWindow Lib "user32" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long

Public Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, lpData As NOTIFYICONDATA) As Long

4、在Form1的Load事件中写下如下代码：

Private Sub Form_Load()

'以下把程序放入System Tray====================================System Tray Begin

With nfIconData

.hWnd = Me.hWnd

.uID = Me.Icon

.uFlags = NIF_ICON Or NIF_MESSAGE Or NIF_TIP

.uCallbackMessage = WM_MOUSEMOVE

.hIcon = Me.Icon.Handle

'定义鼠标移动到托盘上时显示的Tip

.szTip = App.Title + "(版本 " &App.Major &"." &App.Minor &"." &App.Revision &")" &vbNullChar

.cbSize = Len(nfIconData)

End With

Call Shell_NotifyIcon(NIM_ADD, nfIconData)

'=============================================================System Tray End

Me.Hide

End Sub

5、在Form1的QueryUnload事件中写入如下代码：

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

Call Shell_NotifyIcon(NIM_DELETE, nfIconData)

End Sub

6、在Form1的MouseMove事件中写下如下代码：

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Dim lMsg As Single

lMsg = X / Screen.TwipsPerPixelX

Select Case lMsg

Case WM_LBUTTONUP

'MsgBox "请用鼠标右键点击图标!", vbInformation, "实时播音专家"

'单击左键，显示窗体

ShowWindow Me.hWnd, SW_RESTORE

'下面两句的目的是把窗口显示在窗口最顶层

'Me.Show

'Me.SetFocus

'' Case WM_RBUTTONUP

'' PopupMenu MenuTray '如果是在系统Tray图标上点右键，则d出菜单MenuTray

'' Case WM_MOUSEMOVE

'' Case WM_LBUTTONDOWN

'' Case WM_LBUTTONDBLCLK

'' Case WM_RBUTTONDOWN

'' Case WM_RBUTTONDBLCLK

'' Case Else

End Select

End Sub

7、现在将程序保存起来运行看看系统托盘处是否增加了一个本工程的图标。单击此图标，Form1就自动d出来了。

---