Форум: "WinAPI";
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];
ВнизMargin и PopupMenu Найти похожие ветки
← →
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;
Ну остались в принципе мелочи.
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.005 c