Форум: "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.028 c
1-43030           Surprising            2002-02-11 10:13  2002.03.14  
Delphi&Excel


14-43183          McSimm                2002-01-29 12:54  2002.03.14  
В Borlande тоже шутники.


1-43099           Anar                  2002-02-27 00:18  2002.03.14  
JPG2BMP


3-42922           Roman Tutov           2002-02-14 10:34  2002.03.14  
Перенос строки из DBGreed в String Greed


1-43066           Seven                 2002-02-26 12:56  2002.03.14  
RX компоненты