Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];




Вниз

Margin и PopupMenu 


Evgeny   (2002-01-11 13:39) [0]

Хотелось бы нарисовать полоску в PopupMenu (как в кнопке пуск). Вроде все просто - лови WM_DRAWITEM и обрабатывай. Но это сообщение дает Rect на конкретный Item, а требуется узнать Rect на все меню. Поделитесь у кого есть соображения на сей счет. А может есть какие другие идеи.



nikkie   (2002-01-11 16:03) [1]

разрезать картинки на n кусочков (n - количество пунктов в меню). на WM_DRAWITEM отрисовывать соответствующую часть картинки.



Gennady   (2002-01-11 17:44) [2]

дай адрес, вышлю пример



Evgeny   (2002-01-12 07:28) [3]

>nikkie
Каким образом тогда узнать размеры пунктов MF_SEPARATOR



Evgeny   (2002-01-12 08:34) [4]

>Gennady
Afro@sibovk.omskcity.com



Igor_thief   (2002-01-14 19:53) [5]

Народ, а киньте и мне такой исходник. Буду очень благодарен.



nikkie   (2002-01-14 20:36) [6]

>Evgeny
вроде бы стандартно они такого же размера как и все остальные пункты меню.

но зачем их узнавать? ты на них собираешься рисовать? тогда они будут стиля MF_OWNERDRAW и их размер ты сам определишь на WM_MEASUREITEM.



Evgeny   (2002-01-15 14:40) [7]

>Gennady.
Спасибо. Пример получил, вечером поковыряю.

>nikkie.
Мои изыскания.
В MeasureItem увеличиваем ширину меню на размер полоски:

if lpmis.CtlType = ODT_MENU then
if MarginLeft > 0 then
inc(lpmis.itemWidth, MarginLeft + 1);

а в DrawItem можно отрисовать:

if lpdis.itemAction = ODA_DRAWENTIRE then
begin
GetClipBox(lpdis.hDC, MarginRect);
MarginRect.Right := MarginLeft;
FillBkGradient(lpdis.hDC, MarginRect, $808080, $000000, 32, flTop);
end;

Ну остались в принципе мелочи.




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.021 c
6-43123           Romul                 2001-12-26 16:46  2002.03.14  
MDaemon : WinSock Error Software caused a connection abort


1-43105           Noname2002            2002-02-28 10:39  2002.03.14  
Работа с компонентами


14-43159          Satrap                2002-01-30 09:30  2002.03.14  
Глупый вопрос


1-43050           greenrul              2002-02-25 19:27  2002.03.14  
Создание компонента в RunTime


1-43102           A.L.                  2002-02-14 14:05  2002.03.14  
Form2.Parent:= Form1