Форум: "KOL";
Текущий архив: 2006.06.04;
Скачать: [xml.tar.bz2];
ВнизОбрезаются иконки в MainMenu Найти похожие ветки
← →
shalex (2005-09-29 13:48) [0]1. Пытаюсь вставить иконки размером 16х16 в MainMenu, но они обрезаются. Что делать? Пробовал сделать иконки меньшего размера (14 х 14), но с таким размером уже практически ничего не видно.
2. Заодно подскажите как вставить в проект иконку для всего приложения?
← →
ECM © (2005-09-29 14:12) [1]1) А если увеличить высоту строк меню?
function TForm1.MainMenu1MeasureItem(Sender: PObj;
Idx: Integer): Integer;
var
Bound: Integer;
bb: packed record
Height: WORD;
Width: WORD;
end absolute Bound;
begin
bb.Height := 18;
bb.Width := 100;// 0 - значение вычисляется системой автоматически
Result := Bound;
end;
2) Можно таким способом:
KOLProject1.dprResource = TRUE
... дальше как и в VCL-проектах Project->Options->Application->Load Icon
← →
shalex (2005-10-01 11:58) [2]MainMenu1MeasureItem не работает.
← →
ECM © (2005-10-01 13:25) [3]
> MainMenu1MeasureItem не работает.
Работает...но только для пунктов меню у которых ownerDraw = TRUE
В этом случае прийдется еще немного потрудиться и написать собственную отрисовку пунктов меню - MainMenu1DrawItem
см.
http://delphimaster.net/view/11-1107841870/
Страницы: 1 вся ветка
Форум: "KOL";
Текущий архив: 2006.06.04;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.036 c