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

Вниз

Как нарисовать иконку в MenuItem   Найти похожие ветки 

 
McSimm2   (2003-11-04 11:08) [0]

Требуется взять битмап из ImageList`a и поместить его в пункт меню.
Делаю через drawIсon(Acanvas.Handle, 0, 0, ???)
Но что то совсем уже торможу, не могу из ImageList`a взять нужную иконку ...


 
McSimm2   (2003-11-04 11:13) [1]

Делаю вот так ....

try
_Bitmap := TBitmap.Create;
ImageList.GetBitmap(1, _Bitmap);
BitBlt(ACanvas.Handle,0,0,_Bitmap.Width,_Bitmap.Height,_Bitmap.Handle,0,0,SRCCOPY)
finally
_Bitmap.Free;
end;


 
han-bratan   (2003-11-04 11:14) [2]

А почему не использовать ImageList + свойство меню Images?
А получить иконку можно чере procedure GetIcon(Index: Integer; Image: TIcon); overload;
Cjjndtncndtyyj Bitmap вытягивается при помощи procedure GetBitmap(Index: Integer; Image: TBitmap);



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

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

Наверх




Память: 0.46 MB
Время: 0.05 c
6-41864
delpher_gray
2003-09-17 11:16
2003.11.13
Надёжный способ приёма


14-42042
Карелин Артем
2003-10-22 15:53
2003.11.13
Покритикуйте мою вторую попытку многопоточного доступа к базе.


4-42267
Dark Elf
2003-09-18 16:54
2003.11.13
SHBrowseForFolder


6-41837
Morg
2003-09-13 12:22
2003.11.13
Как узнать скорость


1-41620
Kif
2003-10-26 13:29
2003.11.13
Как обратиться из Delphi к Dll написанной на фортране..