I am having a helluva time trying to get my icon in the task tray to
refresh..
Basically what I have is this:

If mnuPRO.Checked = False Then
Me.Icon = Stp.Picture
ElseIf mnuPRO.Checked = True Then
Me.Icon = IC.Picture
Else
Me.Icon = Main.Picture

But when my program is sitting in the task tray, and I select the
mnuPRO via popup meny, the action works, but the icon doesn't change??
       Any ideas?
               Thanks              
                   Dave

To refresh the icon in the tray, you have to make another call to the
Shell_NotifyIcon API function with the dwMessage Parameter set to NIM_MODIFY
and the NOTIFYICONDATA structure parameter set to reflect any icon changes.

Steve

so to reflect my change in the below example, I would have to call it
by:
 If mnuPRO.Checked = False Then
call Shell_NotifyIcon(NIM_DELETE, NID)
 Me.Icon = Stp.Picture
 ElseIf mnuPRO.Checked = True Then
 Me.Icon = IC.Picture
call Shell_NotifyIcon(NIM_MODIFY, NID)
 Else
 Me.Icon = Main.Picture

is that right???

        thanks for the fast reply
                          dave

Thanks for your reply..... just after I got your reply, and after I
replied again.. I finally got it.. You helped me a GREAT deal! This is
what I did for others that have the same question:

        'changes the icon to display
        NID.hIcon = IC.Picture
        'removes current icon from tray
        Call Shell_NotifyIcon(NIM_DELETE, NID)
         'calls the API to add in new icon
        Call Shell_NotifyIcon(NIM_ADD, NID)

Thanks again;
            Dave

Thanks for your reply..... just after I got your reply, and after I
replied again.. I finally got it.. You helped me a GREAT deal! This is
what I did for others that have the same question:

        'changes the icon to display
        NID.hIcon = IC.Picture
        'removes current icon from tray
        Call Shell_NotifyIcon(NIM_DELETE, NID)
         'calls the API to add in new icon
        Call Shell_NotifyIcon(NIM_ADD, NID)

Thanks again;
            Dave