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

Вниз

Картинка с прозрачным фоном в системном меню формы   Найти похожие ветки 

 
kva   (2003-03-03 16:45) [0]

Добавляю картинку в системное меню формы. Все вроде нормально, но никак не могу добиться прозрачного фона. Делаю приблизительно так

var FBmp: TBitmap;
FMenu: THandle;
...
FMenu:=GetSystemMenu(TForm(Aowner).Handle, False);
FBmp:=TBitmap.Create;
FBmp.LoadFromResourceName(HInstance,"FA");
FBmp.Transparent := True;
FBmp.TransparentMode:=tmAuto;
...
InsertMenu(FMenu, nPos, MF_STRING or MF_BYPOSITION, 0, PChar("строка меню"));
...
SetMenuItemBitmaps(FMenu, nPos, MF_BYPOSITION OR MF_BITMAP, FBmp.Handle, FBmp.Handle);


Если рисую эту картинку на форме то все нормально, фон прозрачный, а в меню никак.

Где ошибка?


 
kva   (2003-03-04 08:16) [1]

А может кто работал с системным меню? Или какие другие подходы чтобы загнать картинку туда?



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

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

Наверх




Память: 0.46 MB
Время: 0.011 c
14-680
Delphinium
2003-04-16 08:33
2003.05.01
Обновление под Delphi 5


3-372
dim
2003-04-11 10:30
2003.05.01
DBCtrlGrid + DBText


3-462
Siv Soft
2003-04-14 12:28
2003.05.01
IBUpdateSQL - не получается ApplyUpdates


1-589
anbezr
2003-04-18 15:04
2003.05.01
Форма как компонент


14-764
Михайлов Антон
2003-04-13 19:33
2003.05.01
MainMenu