Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Обрезаются иконки в MainMenu [Delphi, Windows]


shalex ©   (2005-09-29 13:48:00) 

1. Пытаюсь вставить иконки размером 16х16 в MainMenu, но они обрезаются. Что делать? Пробовал сделать иконки меньшего размера (14 х 14), но с таким размером уже практически ничего не видно.

2. Заодно подскажите как вставить в проект иконку для всего приложения?


ECM   (2005-10-01 13:25:00) [1]


> MainMenu1MeasureItem не работает.

Работает...но только для пунктов меню у которых ownerDraw = TRUE
В этом случае прийдется еще немного потрудиться и написать собственную отрисовку пунктов меню - MainMenu1DrawItem
см.
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1107841870&n=10


shalex   (2005-10-01 11:58:00) [2]

MainMenu1MeasureItem не работает.


ECM   (2005-09-29 14:12:00) [3]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо