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

Вниз

Как прилепить к bitbuttonу рисунок?   Найти похожие ветки 

 
RTWolf ©   (2004-04-09 21:16) [0]

Памагите с праблемой. Суть такова мне надо создать кнопку с рисунком (bitbtn),
причем рисунок должен быть gif"ом или еще чен-нить. Моно канечно и из bmp грузить но там надо как-то
указать какой цвет будет являться прозрачным.
Вот как я делаю, что не так?:

var
 bmp: kol.PBitmap;
 gif: PGif;
begin
gif :=NewGif;
gif.LoadFromFile("E:\BTN_UNDO.gif");

bmp:=newbitmap(16,16);
bmp.Draw(gif.Handle,0,0);

btnReset := NewBitBtn( form, "Oтмена",[],glyphLeft,bmp.Handle,1 );

.............

На выходе получаю кнопку с рисунком состоящий из черного цвета.


 
Delphi5.01 ©   (2004-04-09 21:22) [1]

ia ne ispolzoval nikogda gif, no kak ia znau vmesto gif.Handle nado ukazat gif.Canvas.Handle. i mne ne sovsem ponatno pochemu vi risuete v gif fail, mojet vi hoteli sdelat chtoto vrode gif.Draw(bmp.Canvas.Handle,0,0);
V otlichie ot VCL v KOL Draw rabotaet zadom na perod, a imenno BMP.Draw oznachaet chto BMP budet risovatsa kudato a ne kak v VCL kuda sma BMP budet risovatsa! :-)))



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

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

Наверх




Память: 0.46 MB
Время: 0.023 c
1-1096880871
}|{yk
2004-10-04 13:07
2004.10.17
CharToOem и Cp866-U


3-1095759267
Chlavik
2004-09-21 13:34
2004.10.17
Добавляю запись в которой одно поле "Счётчик"


1-1096359447
Jolik
2004-09-28 12:17
2004.10.17
stdcall в D5 & D7...


9-1087305854
Developer
2004-06-15 17:24
2004.10.17
А как сделать заставку в начале, которая плавно появляеться..


14-1096088031
Шишкин Илья
2004-09-25 08:53
2004.10.17
Не могу установить компонент