Страница: 1 |
Как можно получить текст пункта меню, зная идентификатор пункта меню?
Может быть GetMenuString? Dim i_gmc As Integer GetMenuCaption = Space(255) i_gmc = GetMenuString(ihMenu, inPos, GetMenuCaption, 255, Pos) GetMenuCaption = Left(GetMenuCaption, i_gmc) End Function Страница: 1 |
Вопрос: API: получение текста пункта меню по идентифика...
Добавлено: 22.01.04 19:07
Автор вопроса: Chill | ICQ: 554200
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #1
Добавлено: 22.01.04 19:42
Номер ответа: 2
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #2
Добавлено: 22.01.04 20:08
Public Function GetMenuCaption(ihMenu As Long, inPos As Long, Optional Pos As mnuApInsmnu = MF_BYCOMMAND) As String
Объявления не привожу, mnuApInsmnu - Перечисление констант, заместо MF_BYCOMMAND нужно MF_BYPOSITION...