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

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

Картинка с прозрачным фоном в системном меню формы [D5, Win2k]


kva ©   (2003-03-03 16:45:00) 

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

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:00) [1]

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


Наверх

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