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

Вниз

Динамическое создание спрайта   Найти похожие ветки 

 
Falcon(TFsoft) ©   (2004-10-14 22:49) [0]

Привет мастера!

Подскажите пожаёлуста ришение следующего вопроса...
Мне нужно динамически  создать спрайт (загрузить в имадж лист, из файла), разбитый на patterns, для анимации.
как это реализовать (Using DelphiX)


 
Megabyte-ceercop ©   (2004-10-15 07:28) [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 могу ошибаться синтаксически. Всегда непомню как они точно пишутся.

Пиши если еще чего не поймешь.



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

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

Наверх




Память: 0.46 MB
Время: 0.025 c
1-1105531585
SIG
2005-01-12 15:06
2005.01.23
Рисунок в поле DBGrid


6-1099087380
Novichok
2004-10-30 02:03
2005.01.23
Как получить IP адреса


3-1103610183
Mefodiy
2004-12-21 09:23
2005.01.23
Ошибка при использовании SQLConnection в Oracle


3-1103316384
slart
2004-12-17 23:46
2005.01.23
delphi+SQL+ACCESS


1-1104926082
zt50
2005-01-05 14:54
2005.01.23
Переименовать файл