Shell_NotifyIcon на дистрое трея вызывается:
- Код: Выделить всё
Case %WM_DESTROY
Shell_NotifyIcon %NIM_DELETE, ti
Case %WM_DESTROY
Shell_NotifyIcon %NIM_DELETE, ti
А перед завершением программы убрать иконку из трея ни как?тоже самое, что у меня, иконка после закрытия программы по прежнему висит в трее
Twister писал(а):А перед завершением программы убрать иконку из трея ни как?тоже самое, что у меня, иконка после закрытия программы по прежнему висит в трее
Case %WM_DESTROY
Shell_NotifyIcon %NIM_DELETE, ti
Не вкурил, какое именно окно по WM_DESTROY выгружает иконку? Попробуй по WM_CLOSE - я так делал.Shell_NotifyIcon на дистрое трея вызывается:
BV писал(а):jangle, в case попадаешь? Стань туда бряком, посмотри id иконки
Case %WM_DESTROY
Shell_NotifyIcon %NIM_DELETE, ti
EndProgramm
p.s. Кстати говоря, переменная ti в CallBack функции обязательно должна быть Static, иначе иконка мз трея удаляться не будет.
Private Sub Form_Load()
' Заносим иконку в трей и скрываем форму
TaskIcon1.Add Form1.Icon, "Моя программа"
Form1.Hide
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
' Удаляем иконку из трея
TaskIcon1.Delete
End Sub
Saturn.65 писал(а):Я так делал.
- Код: Выделить всё
Private Sub Form_Load()
' Заносим иконку в трей и скрываем форму
TaskIcon1.Add Form1.Icon, "Моя программа"
Form1.Hide
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
' Удаляем иконку из трея
TaskIcon1.Delete
End Sub
Денис писал(а):Потому что у него в подписи такой намек.
Не а не понимаю
Денис писал(а):Но больше всего возмущает, что топикстартером является jangle, с намеком на гениальных художников в подписи, который стесняется юзать вышеописанный класс.
Сейчас этот форум просматривают: Google-бот и гости: 32