Клубове Дир.бг
powered by diri.bg
търси в Клубове diri.bg Разширено търсене

Вход
Име
Парола

Клубове
Dir.bg
Взаимопомощ
Горещи теми
Компютри и Интернет
Контакти
Култура и изкуство
Мнения
Наука
Политика, Свят
Спорт
Техника
Градове
Религия и мистика
Фен клубове
Хоби, Развлечения
Общества
Я, архивите са живи
Клубове Дирене Регистрация Кой е тук Въпроси Списък Купувам / Продавам 05:31 28.09.24 
Компютри и Интернет
   >> Delphi
Всички теми Следваща тема *Кратък преглед

Тема Картинка в TBitBtnнови  
АвторЛюбo (Нерегистриран)
Публикувано18.09.06 13:35



Здравейте някой да знае метод как да взема от ImageList някоя картинка и да я сложа на TBitBtn
Пробвах няколко вариянта но нищо :
ImageList1.DrawOverlay( Btn.Glyph.Canvas, Btn.Glyph.Canvas.ClipRect.TopLeft, Btn.Glyph.Canvas.ClipRect.BottomRight, 0, 0 );
Този ми се стори най логинчен но пак нищо

Благодаря предварително !



Тема Re: Картинка в TBitBtnнови [re: Любo]  
Автор andrew_nikoloff (bugbuster)
Публикувано18.09.06 15:51



Трябва да направиш нещо такова:


B := TBitmap.Create;
try
il.GetBitmap(idx, B);
Button.Glyph.Assign(B);
finally
B.Free;
end;




Тема Re: Картинка в TBitBtn [re: Любo]  
Автор TRN ()
Публикувано19.09.06 14:32



Ето друг вариант
ImageList1.GetBitmap(1,BitBtn1.Glyph);



Тема Re: Картинка в TBitBtnнови [re: TRN]  
Автор andrew_nikoloff (bugbuster)
Публикувано19.09.06 14:42



Ако глифа няма да се сменя повече - може и така





Тема Re: Картинка в TBitBtnнови [re: andrew_nikoloff]  
Автор TRN ()
Публикувано19.09.06 15:15



Не пречи да си го сменя когато си поиска, стига да знае поредния номер на изображението в списъка на ImageList (1 e първия номер в списъка на ImageList, просто не съм го написал, а той трябва да се сети).



Тема Re: Картинка в TBitBtnнови [re: TRN]  
Автор andrew_nikoloff (bugbuster)
Публикувано19.09.06 15:51



Не, напротив - пречи. Пъхни няколко картинки в един ImageList и пробвай следния код:


procedure TForm1.BitBtn1Click(Sender: TObject);
begin
ImageList1.GetBitmap(BitBtn1.Tag, BitBtn1.Glyph);
BitBtn1.Tag := (BitBtn1.Tag + 1) mod ImageList1.Count;
end;

След първото GetBitmap глифа повече не се сменя.



Тема Re: Картинка в TBitBtnнови [re: andrew_nikoloff]  
Автор TRN ()
Публикувано19.09.06 16:02



Започва да става дискусия
Това оправя нещата
BitBtn1.Glyph:=nil;
......



Тема Re: Картинка в TBitBtnнови [re: TRN]  
Автор andrew_nikoloff (bugbuster)
Публикувано19.09.06 16:06



Тамън да стана дискусия и тя взе, че свърши


Да, това оправя нещата



Тема Re: Картинка в TBitBtnнови [re: andrew_nikoloff]  
АвторЛюбo (Нерегистриран)
Публикувано20.09.06 16:33



Хе хе евала момчета благодаря за отговорите !!!!! :))




Всички темиСледваща тема*Кратък преглед
Клуб :  


Clubs.dir.bg е форум за дискусии. Dir.bg не носи отговорност за съдържанието и достоверността на публикуваните в дискусиите материали.

Никаква част от съдържанието на тази страница не може да бъде репродуцирана, записвана или предавана под каквато и да е форма или по какъвто и да е повод без писменото съгласие на Dir.bg
За Забележки, коментари и предложения ползвайте формата за Обратна връзка | Мобилна версия | Потребителско споразумение
© 2006-2024 Dir.bg Всички права запазени.