Вниз
Скачать: CL | DM;

Как установить ширину PopupMenu при OwnerDraw = True   Найти похожие ветки 

← →
L`Autour ©   (2008-08-04 07:38) [0]

Если вручную прорисовываю отдельные элементы меню, то ширина всего меню, определяется остальными элементами меню, иначе в качестве меню получаю узкую полоску.

И еще, если я делаю ручную прорисовку некоторых элементов меню своим шрифтом, то у остальных элементов при их первой прорисовке он сохраняется. Восстанавление шрифта на дефолтный происходит, только если над пунктом меню провести мышкой.


← →
L`Autour ©   (2008-08-07 07:20) [1]

Все в отпусках?


← →
mdw ©   (2008-08-07 10:08) [2]

Если правильно понял вопрос, то Вам нужно обрабатывать OnMeasureItem, а там Result:= MAKELONG(H, W).


← →
mdw ©   (2008-08-07 10:15) [3]

По поводу второго, нужно смотреть как рисуете. Возможно не восстанавливаете шрифт после отрисовки.


← →
L`Autour ©   (2008-08-08 08:45) [4]

первое попробую

по второму -  я пробовал просто удалять свой шрифт из DC-контектста меню (после моей обработки вывода),  но это не помагало.


← →
mdw ©   (2008-08-08 10:23) [5]


> по второму -  я пробовал просто удалять свой шрифт из DC-
> контектста меню (после моей обработки вывода),  но это не
> помагало.

А старый восстанавливали? Должно быть примерно так:

var Font, OldFont: HFONT;
....
     OldFont:= SelectObject(DC, Font);
.........
     SelectObject(DC, OldFont);
     DeleteObject(Font);


← →
L`Autour ©   (2008-08-08 13:45) [6]

сенк


← →
L`Aurtour   (2008-08-09 07:58) [7]

DeleteObject(Font); - оказался лишним


← →
MTsv DN   (2008-08-09 12:29) [8]

> DeleteObject(Font); - оказался лишним
Не думаю. Память надо беречь 8)


← →
L`Autour ©   (2008-08-11 06:52) [9]

С памятью нормально - просто я забыл сказать, что шрифт свой шрифт создаю и уничтожаю при создании и удалении формы. А здесь его только к контексту цепляю.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.043 c
2-1273303750
FIL-23
2010-05-08 11:29
2010.08.27
поиск в Query


15-1274687750
AKE
2010-05-24 11:55
2010.08.27
У меня много электронной технической литературы...


2-1272351299
noob_one
2010-04-27 10:54
2010.08.27
ВЫзвываю форму из библиотеки. Она отображается отдельной


2-1267107319
Pavel
2010-02-25 17:15
2010.08.27
Обработка текстового файла большого объема


2-1271164899
mlalx213
2010-04-13 17:21
2010.08.27
Задачка




   Наверх