Динамическое создание спрайта [Delphi, Windows]
Falcon(TFsoft) © (2004-10-14 22:49:00)
Привет мастера!
Подскажите пожаёлуста ришение следующего вопроса...
Мне нужно динамически создать спрайт (загрузить в имадж
лист, из файла), разбитый на patterns, для анимации.
как это реализовать (Using DelphiX)
Megabyte-ceercop (2004-10-15 07:28:00) [1]
> Falcon(TFsoft)
Пиривет :) Я сразу как увидел - решил помочь. :))
//Lis - это я так DXImageList называю.
TPictureCollectionItem.Create(Lis.Items);
Lis.Items.Items[Lis.Items.Count-1].Picture.bitmap.loadfromFile("FileName");
Lis.Items.Items[Lis.Items.Count-1].Transparent := true;
Lis.Items.Items[Lis.Items.Count-1].TransparentColor
:=clBlack;
Lis.Items.Items[Lis.Items.Count-1].PatternWight := Твоя
ширина;
Lis.Items.Items[Lis.Items.Count-1].PatternHeigth :=
Lis.Items.Items[Lis.Items.Count-1].Picture.Heigth;
С названиями PatternWight и Heigth могу ошибаться
синтаксически. Всегда непомню как они точно пишутся.
Пиши если еще чего не поймешь.
Наверх 
ЧАТ |
Орешник |
|
