Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c
14-744
Johnmen
2003-04-12 01:40
2003.05.01
В чём смысл смерти....


3-459
oleg_k
2003-04-14 11:56
2003.05.01
Как в Delphi создать список файлов заданного каталога?


1-628
Cybermozg
2003-04-19 13:50
2003.05.01
Как почистить ресурсы?


6-662
nikb
2003-03-05 01:07
2003.05.01
Connect ClientSocket to ServerSocket


3-424
cherruty
2003-04-11 18:44
2003.05.01
Как в BeforeUpdateRecord у компонента TDataSetProvider узнать ID?




   Наверх