Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.25;
Скачать: CL | DM;

Вниз

Как использовать битмапы у пунктов в MainMenu?   Найти похожие ветки 

 
Dimaxx   (2003-06-03 00:06) [0]

Собссно сабж. В VCL я мог влепить хоть 32х32 - пункты увеличивалиь по высоте. Как того же добиться в KOL? У уважаемого Владимира Кладова на сайте есть пример, но он не комплится. Как быть?


 
mdw ©   (2003-06-03 11:18) [1]

Используй событие OnMeasureItem. Например:
function TJMCtrlMainForm.pmJournalsMeasureItem(Sender: PObj; Idx: Integer): Integer;
begin
Result:= MakeLong(66, 148); //Высота - 66, ширина - 148
end;


 
Dimaxx   (2003-06-07 00:25) [2]

Не фурычит! Создал меню "Файл", а у него 3 подпункта. Запустил - ничего не из менилось. Как быть?


 
Кладов   (2003-06-07 10:17) [3]

См. в DemoMenuBitmaps.zip: DemoMenuMeasureItem.dpr.


 
Dimaxx   (2003-06-08 02:51) [4]

Так не работает же DemoMenuBitmaps.zip!!!!! Я уже писал об этом. Там используется свойство FirstCommand, которого (уже?) не в KOL. Потому-то сюда и написал...


 
Кладов   (2003-06-08 05:06) [5]

А у меня почему работает? Ладно, обновлю архив еще раз. Хотя странно, что на сайте не тот, что в локальной копии сайта.



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

Текущий архив: 2004.02.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
6-80066
thevalery
2003-11-27 15:07
2004.02.25
broadcast и две сетевухи


7-80329
xtz
2003-12-04 01:28
2004.02.25
Автозапуск


7-80311
alligator
2003-12-05 17:14
2004.02.25
BIOS и CMOS


1-80020
Построение дерева
2004-02-11 10:48
2004.02.25
Построение дерева в TreeView


3-79602
Onward
2004-02-02 13:35
2004.02.25
При переносе программы БД на другой комп, выдает ошибку.