По кадровая анимация длинного битмапа?
Привет всем!
У меня есть bmp файл, в котором по вертикали расположены кадры анимации как мне превратить его в анимацию?
P.S.: Размеры файла: Высота = 1900
Ширина = 38
Размеры 1го кадра: Высота = 38
Ширина = 38
Всего 50 кадров
Спасибо за внимание!
У меня есть bmp файл, в котором по вертикали расположены кадры анимации как мне превратить его в анимацию?
P.S.: Размеры файла: Высота = 1900
Ширина = 38
Размеры 1го кадра: Высота = 38
Ширина = 38
Всего 50 кадров
Спасибо за внимание!
Цитата:
Originally posted by GooD
Привет всем!
У меня есть bmp файл, в котором по вертикали расположены кадры анимации как мне превратить его в анимацию?
P.S.: Размеры файла: Высота = 1900
Ширина = 38
Размеры 1го кадра: Высота = 38
Ширина = 38
Всего 50 кадров
Спасибо за внимание!
Привет всем!
У меня есть bmp файл, в котором по вертикали расположены кадры анимации как мне превратить его в анимацию?
P.S.: Размеры файла: Высота = 1900
Ширина = 38
Размеры 1го кадра: Высота = 38
Ширина = 38
Всего 50 кадров
Спасибо за внимание!
в каком смысле "как мне превратить его в анимацию?"? то есть программно показать "мультик"? если да, то по очереди покажи части битмапа - кадры. Или я что-то не понял и проблема в другом?
Цитата:
Originally posted by Br@in RIPper
в каком смысле "как мне превратить его в анимацию?"? то есть программно показать "мультик"? если да, то по очереди покажи части битмапа - кадры. Или я что-то не понял и проблема в другом?
в каком смысле "как мне превратить его в анимацию?"? то есть программно показать "мультик"? если да, то по очереди покажи части битмапа - кадры. Или я что-то не понял и проблема в другом?
Ну да чтобы программно показать мультик!
Привет всем!
До меня, наконец, то дошло, как можно сделать анимацию!
Вот так:
1. На форму 1 Таймер, 1 Список картинок(ImageList)
2. В ImageList пишем Height 38 , Width 38 и загружаем нужный рисунок, он ело, разбивает на кадры,
3. В on Timer. Пишем:
Begin
Il.Draw (form1.Canvas, 0, 0, n, true);
N: = N-1;
If n <= 0 then n: = 49;
End;
4. Запускаем и получаем анимацию!
До меня, наконец, то дошло, как можно сделать анимацию!
Вот так:
1. На форму 1 Таймер, 1 Список картинок(ImageList)
2. В ImageList пишем Height 38 , Width 38 и загружаем нужный рисунок, он ело, разбивает на кадры,
3. В on Timer. Пишем:
Begin
Il.Draw (form1.Canvas, 0, 0, n, true);
N: = N-1;
If n <= 0 then n: = 49;
End;
4. Запускаем и получаем анимацию!