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

Вниз

png с альфа каналом на кнопке toolbar а   Найти похожие ветки 

 
Tirex   (2005-02-28 21:10) [0]

Как добавить png с альфа каналом на кнопку toolbar"а?
Такого рода вопросы уже попадались, я их прочел, но ответа на свой вопрос так и не нашел.
Нашел одно решение но это не совсем то что надо
использовал модуль pngimage (http://pngdelphi.sourceforge.net)
procedure LoadIcons;
var
PNG: TPNGObject;
BMP: TBitmap;
I: integer;
dHandle: THandle;
begin
BMP := TBitmap.Create;
BMP.Width:=48;
BMP.Height:=48;
Bmp.Canvas.Brush.Color:=clBtnFace;
bmp.Canvas.FillRect(bmp.Canvas.ClipRect);

png:= TPNGObject.Create;

for i:=1 to 2 do
begin
 Bmp.Canvas.Brush.Color:=clBtnFace;
 bmp.Canvas.FillRect(bmp.Canvas.ClipRect);
 png.LoadFromResourceID(hinstance,2000+I);
 BMP.Canvas.Draw(0, 0, PNG);
 Form1.imlToolbar.Add(bmp,nil);
end;
 BMP.Canvas.Draw(0, 0, PNG);
 Form1.imlToolbar.Add(bmp,nil);
png.free;
bmp.free;
все бы ничего, но при нестандартных темах оформления (XP) под иконкой на кнопке виден квадрат.
Чувствую что можно это сделать с pngimage. Подскажите если кто уже пробовал? Может есть другой способ. (икоки с альфа каналом не пойдет, не работает под 98 и ранних win).


 
Tirex   (2005-03-01 20:12) [1]

Как вариант можно перехватить onpaint кнопки и рисовать фон тем же цветом каким фон кнопки. как это сделать?  Хотя если там градиент это не будет работать.



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

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

Наверх




Память: 0.46 MB
Время: 0.057 c
9-1110462270
Zak3D[@Tm]
2005-03-10 16:44
2005.06.14
VertexArray и с чем его едят?


1-1117384354
GEEK
2005-05-29 20:32
2005.06.14
Finalize(); выдает ошибку...


3-1115264768
Бизон
2005-05-05 07:46
2005.06.14
Проблемы с кодировкой


4-1114110316
Алекс
2005-04-21 23:05
2005.06.14
help plz


1-1117521709
imm
2005-05-31 10:41
2005.06.14
Где искать буфер TBitmap