Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / WindowMenu и иконки / 5 сообщений из 5, страница 1 из 1
27.05.2003, 13:43
    #32169557
Ortess
Ortess
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WindowMenu и иконки
ХЕЛП!!!
При открытии MDI-форм, добавляются новые пункты меню в WindowMenu... А как добраться программно до них?
В частности необходимо отрисовать иконки в пунктах WindowMenu...
Поможите кто может.

с уважением
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.05.2003, 13:51
    #32169570
tygra
tygra
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WindowMenu и иконки
А если в дизайн-тайме добавить - чего получится?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.05.2003, 13:59
    #32169582
KirillovA
KirillovA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WindowMenu и иконки
Код: plaintext
1.
2.
3.
4.
var Handle :THandle; //хэндл системного меню приложения
begin
  Handle := GetMenu (Form1.Handle);
  ModifyMenu (Handle, 1Элемент, MF_BYCOMMAND Or MF_BITMAP, Handle, PChar(Image1.picture.bitmap.handle)) 
end;

пишу по памяти - м.б. ошибки - см мсдн короче...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.05.2003, 13:59
    #32169584
Ortess
Ortess
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WindowMenu и иконки
Эти пункты добавляются в run-time.
Открывается форма и Caption формы становится новым пунктом меню. И тут мне приспичило закинуть туда иконку.

К примеру как в "Query Analalyzer". Когда отрабатывает запрос в каком то окне, то в соответствующем пункте windowmenu отображается иконка...
Хотелось бы и у себя так сделать :(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.05.2003, 14:01
    #32169588
KirillovA
KirillovA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
WindowMenu и иконки
ModifyMenu
позволят модифицировать любой итем любого меню...
битмапу засунуть можно начиная с вин98 или 95 но с пропатченым gdi32
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / WindowMenu и иконки / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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