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

Вниз

Прозрачнисть битмепки ири загрузке в ToolBar.   Найти похожие ветки 

 
GrayFace ©   (2006-05-19 17:12) [0]

Пытаюсь добавить битмепку в тулбар. У битмепки, как положено, в левом нижнем углу цвет фона, да и в других углах тоже. Но прозрачным фон не станосится.


type int = integer;

var h:hwnd; i:int; tb:TTBBUTTON; bit:TTBADDBITMAP; bi:TBitmap; ic:TIcon;
 
 bi:=TBitmap.Create;
 bi.LoadFromFile(AppPath+"Props.bmp");
 bi.PixelFormat:=pf32bit;
 with bit do
 begin
   hInst:=0;
   nID:=bi.Handle;
 end;

 i:=SendMessage(h, TB_ADDBITMAP, 1, int(@bit));
 if i=-1 then RaiseLastOSError;

  // Вот, заодно, код добавления кнопки:
 with tb do
 begin
   iBitmap:=i;
   idCommand:=$ff;
   fsState:=TBSTATE_ENABLED;
   fsStyle:=TBSTYLE_BUTTON;
   iString:=5;
 end;
 SendMessage(h, TB_INSERTBUTTON, 13, int(@tb));


 
GrayFace ©   (2006-05-22 17:46) [1]

Удалено модератором
Примечание: Создание пустых сообщений


 
GrayFace ©   (2006-05-25 13:10) [2]

Удалено модератором
Примечание: Создание пустых сообщений


 
GrayFace ©   (2006-05-26 10:13) [3]

Жаль, что кроме "Создание пустых сообщений" никто ничего не может сказать. Я ведь их создаю потому что вопрос важен. Кто работал с ToolBar"ом?



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

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

Наверх




Память: 0.47 MB
Время: 0.042 c
15-1157694584
Ega23
2006-09-08 09:49
2006.10.01
С Днём рождения! 8 сентября


15-1157814167
ArtemESC
2006-09-09 19:02
2006.10.01
Английский...


4-1148734327
oleg_SYS
2006-05-27 16:52
2006.10.01
Как получить список открытых хендлов приложения?


2-1158034025
Drowsy
2006-09-12 08:07
2006.10.01
Копирование строки таблицы.


1-1156004220
Elf-Eluna-Alina
2006-08-19 20:17
2006.10.01
Вставить текст в RichEdit