powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Иконка в пункте меню
22 сообщений из 22, страница 1 из 1
Иконка в пункте меню
    #34449905
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Возник вопрос: Как поместить иконку в пункт меню? Смотрел на форуме, но ничего не нашел.
И еще вопрос: как получить иконку файла?
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34449954
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Забыл; В трей уже поместил
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450207
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450227
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Nikz здесь
Спасибо. Жаль, я там ничего не понял (плохо с английским)
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450256
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
кладем файлы в c:\windows\system32
регистрируем
regsvr32 c:\windows\system32\cNewMenu6.dll
regsvr32 c:\windows\system32\SSubTmr6.dll
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450259
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
простенький пример
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450273
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450295
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо. Буду разбиратся... Но вот както попроще нельзя? :))
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450309
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Получается помимо программы придется таскать за сабой dll. Да еще и к этому както их регестрировать...
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450318
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
max_111Получается помимо программы придется таскать за сабой dll. Да еще и к этому както их регестрировать...
а еще нужно и код писать... ))
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450333
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Это точно :)) Совет влечет за собой кучу вопросов
1 Как регистрировать автоматом
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450347
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
инсталлятор сделать
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450359
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Началось.. )) Из за 2-ух иконок. Круто... Может все-таки есть способ попроще???
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450392
hawkV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Мне помогло. Посмотри.
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450429
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да, симпатично. У меня такая ситуация

Private Sub sTrayIco1_RightClick()

Set STrayIco1.Icon = Picture1(1).Picture
STrayIco1.Modify
PopupMenu mnu1

End Sub

Весь код написан, хотелось бы просто добавить иконки. Что нужно изменить(добавить) что-бы не ломать весь код
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450491
hawkV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Если я правильно понял, то это должно подойти.
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34450542
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
МОЩЬНО!! У меня ща мозги расплавятся...)) У меня теперь работы на год хватит. Столько кода что я ничего понять немогу( что куда и зачем). Спасибо, примеры хорошие, но запутаны (для моей ступени развитости и познаний в VB). Если есть у кого время напишите самый примитивный пример для добавленя иконки в меню.Спасибо
Моя программка висит в трее и нажав на иконку откр. список, вот в этом списке и надо поместить иконки напротив каждого пункта. Список является обычным меню.
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34451194
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Nikzпростенький пример
Проблема
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
cP.ShowPopupMenu X, Y
End Sub
В этом примере курсор находится на форме и когда отпустил мышь cP.ShowPopupMenu получает координаты x ,y.
У меня задача в другом, как при событии (sTrayIco1_RightClick) cP.ShowPopupMenu получало координаты X ,Y курсора

Private Sub sTrayIco1_RightClick()
PopupMenu mnu1
End Sub

PopupMenu mnu1 это обычное меню ,с ним разобрался но иконку в него засунуть никак не получается
cP.ShowPopupMenu вот в него то можно, но проблема с реакцией на клик по иконке в трее
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34451439
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я лет 10 назад такое на Делфи писал, когда только начинал его учить :), те же проблемы были: жутко интересно и ничего не понятно :). Ты главное пробуй все, во всем ковыряйся и читай побольше документации, со вренем начнешь понимать что происходит :).


Magnus
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34452629
Nikz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в заголовке формы
Код: plaintext
1.
2.
3.
4.
5.
Private Type POINTAPI
    X As Long
    Y As Long
End Type
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
где то в коде
Код: plaintext
1.
2.
3.
4.
5.
Private Sub sTrayIco1_RightClick()
Dim point As POINTAPI
GetCursorPos point
cP.ShowPopupAbsolute point.X, point.Y
End Sub
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34453424
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо всем!!! особенно Nikz, все работает. ))
...
Рейтинг: 0 / 0
Иконка в пункте меню
    #34454141
max_111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вопрос в догонку пока вы не ушли. Снова про иконку но....
Как можно получить иконку из файла(например .exe). Т.е. чтобы моя иконка стала такой же как у файла(похоже на то как ярлык получает внешний вид файла).
...
Рейтинг: 0 / 0
22 сообщений из 22, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Иконка в пункте меню
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]