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

Вниз

TImageList и последовательности картинок для TAnimatedImage   Найти похожие ветки 

 
harisma   (2007-08-31 13:14) [0]

Есть компонента TAnimatedImage из коллекции TRXLib.
Есть стандартный компонент TImageList
Есть несколько *.bmp" картинок, являющихся последовательностямии рисунков для анимированного их отображения в компоненте TAnimatedImage.
Проблема: Когда я их добавляю в TImageList, то потом в TAnimatedImage эти картинки получаются очень кривые. Анимации вообще никакой не получается. (Реализация анимации реализована в коде примерно следующего вида:

procedure TMainClientForm.BusyIndicatorLoadPicture(AIndex: integer);
var
 LBmp: TBitmap;
begin
 LBmp := TBitmap.Create;
 try
   if (AIndex < 1) or (AIndex >= imgBIS.Count) then
     AIndex := 1;
   imgBIS.GetBitmap(AIndex - 1, LBmp);
   aiBusy.Glyph := LBmp;
   aiBusy.NumGlyphs := LBmp.Width div aiBusy.Width;
   aiBusy.InactiveGlyph := aiBusy.NumGlyphs - 1;
 finally
   FreeAndNil(LBmp);
 end
end;


где imbBIS - TImageList;
aiBusy - TAnimatedImage.
В чем проблема?


 
@!!ex ©   (2007-08-31 13:23) [1]

> [0] harisma   (31.08.07 13:14)

А нафига использовать какой то компонент?
IMageList успешно умеет себя быстро рисовать прямо на форме, или на ImageLIst"e.


 
Ega23 ©   (2007-08-31 13:29) [2]

Создай свой TAnimatedImageList



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

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

Наверх




Память: 0.47 MB
Время: 0.032 c
8-1165654267
iNevil
2006-12-09 11:51
2007.09.23
TColor -> RGB


2-1188556457
новЫчек
2007-08-31 14:34
2007.09.23
остановка работы цикла


11-1172162117
kotlf
2007-02-22 19:35
2007.09.23
под win2000 arial показывает квадратики


2-1187705188
Виктор007
2007-08-21 18:06
2007.09.23
Использование объектов


15-1188124654
matt
2007-08-26 14:37
2007.09.23
Если бы архитекторам пришлось работать так же, как программистам.