Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / изменить шрифт в собственном меню (API) / 13 сообщений из 13, страница 1 из 1
15.10.2006, 20:48
    #34055862
Avtopic
Avtopic
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
Тону во времени и в незнании.
В один форум уже написал, но там пока что даже никто не смог прочесть вопрос не то чтобы ответить.
А задача душит.
вопрос такой:

Как изменить шрифт в собственном меню, созданном с помощью (API) CreatePopupMenu, AppendMenu и т.д. (Самое главное, можно ли?)
(изменить шрифт на другой шрифт, который уже инсталлирован).
Долгое время бьюсь над этим. Кое что удалось кое что нет.
Куда копать в двух словах, подтолкните.
Например, для формы в Vb изменить шрифт удается сделать. Дальше не смог продвинутся
Основная проблема упирается в нахождении hdc меню для
SelectObject(??,hdc, rFont)
Ну, очень нужно.
Спасибо за любой отзыв!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 10:32
    #34056334
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
Шрифт меню - системная настройка, находится в свойствах экрана - Оформление - Дополнительно. Изменить для отдельной программы скорее всего не получится.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 11:59
    #34056618
Avtopic
Avtopic
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
Какие системные настройки, Разговор идет об API функциях.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 12:13
    #34056681
michael R
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
может это пойдёт
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 13:32
    #34057020
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
Бью себя ушами по щекам. Всегда думал, что используется только системный шрифт меню.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 15:45
    #34057556
Avtopic
Avtopic
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
michael Rможет это пойдёт
Спасибо, я стараюсь ваш вариант привязать к своему меню

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
hMenu = CreatePopupMenu()
AppendMenu hMenu, MF_STRING, ByVal  1 &, "  Copy"
AppendMenu hMenu, MF_STRING, ByVal  2 &, "  Paste"
AppendMenu hMenu, MF_SEPARATOR, ByVal  0 &, ByVal  0 &
InsertMenu hMenu,  3 &, MF_POPUP, SubMenu3, "  Format Cell"
InsertMenu hMenu,  4 &, MF_POPUP, SubMenu4, "  Format Column"
...
GetCursorPos Pt
TrackPopupMenu hMenu,  0 , Pt.x, Pt.y,  0 , Fhwnd, ByVal  0 &

пока что результаты неутешительные
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 16:20
    #34057755
michael R
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
Что ты хочешь сделать
Может могу помочь
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 17:27
    #34058020
Avtopic
Avtopic
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
michael RЧто ты хочешь сделать
Может могу помочьСпасибо, мне нужно было сделать это с PopupMenu при правом клике, с твоей помощью
сделал уже.
Но, у меня такой вопрос если в курсе, все примера которые я встречал, используют
SubClassing, почему это так сложно менять шрифт в меню, неужели нельзя без
SubClassing-а, допустим, задать в какую-то структуру, какие-то параметры, а потом чтоб сам рисовал, пользуясь этими параметрами, в том числе и шрифта. Ну, Канешно я слишком упростил, но что-то в этом роде.
Спасибо еще раз.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 17:37
    #34058068
michael R
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
К сожалению в VB6 нельзя
это одно из его ограничений
в ранних версиях VB можно было делать такие вещи
только через дополнительные контроли
так что перехватывать события и производить перерисовку можно только так
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 17:46
    #34058101
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
2 Antonariy
можешь не бить :)

обычное меню всегда юзает системный шрифт, а вариант , что был представлен, использует рисованное на API меню, отсюда и сабклассинг и все остальные прелести ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.10.2006, 18:30
    #34058272
Avtopic
Avtopic
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
Все предельно ясно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.10.2006, 18:37
    #34075063
Avtopic
Avtopic
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
Как я писал выше, приспособил эту перерисовку меню, к своему меню, пошел чуть дальше и добавил рисунки к пунктам меню, но зациклился на одном месте, в частности:

никак не могу заставить перерисоваться элементу созданному как MF_POPUP, т.е. заголовка подменю.
можно или нет заголовку подменю, созданному как MF_POPUP, задать MF_OWNERDRAW.
Спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.10.2006, 21:36
    #34088256
Avtopic
Avtopic
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
изменить шрифт в собственном меню (API)
AvtopicКак я писал выше, приспособил эту перерисовку меню, к своему меню, пошел чуть дальше и добавил рисунки к пунктам меню, но зациклился на одном месте, в частности:

никак не могу заставить перерисоваться элементу созданному как MF_POPUP, т.е. заголовка подменю.
можно или нет заголовку подменю, созданному как MF_POPUP, задать MF_OWNERDRAW.
Спасибо!
Нашел, наконец!
Может, кому поможет:
для элемента меню MF_POPUP ответ = MF_BYPOSITION Or MF_OWNERDRAW
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / изменить шрифт в собственном меню (API) / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 342ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2165078]:
 0ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 51ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 38ms
get tp. blocked users:
 1ms
others: 216ms
total:  342ms
x
x
Закрыть


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