Скачать: CL | DM;

Анимационный вывод изображения   Найти похожие ветки 

← →
Алексей ©   (2007-11-07 22:21) [0]

Попосил бы помочь, я не могу написать процедуру:
procedure AnimationDraw(DC1, DC2: HDC; const Left, Top, Width, Height: Integer;
 const Time, Count: Byte);
где
 DC1 - куда рисуем (исходное изображение);
 DC2 - откуда рисуем (изображение на замену);
 Time - время замены
 Count - число кадров на замену

Как я понял:
 - создается массив DC: array of HDC;
 - в DC[I] копируется DC1;
 - в DC[I] AlphaBlend DC2, BlendValue = I;
 - с определенной задержкой в DC1 копируется поочередно DC[I];
 - задержку обеспечивал с помощью таймера

Не работает.

Заранее признателен Алексей, мой mail Kirsanov-Alex@Yandex.ru

---

← →
antonn ©   (2007-11-07 23:40) [1]

> - создается массив DC: array of HDC;

ну я бы создал массив из Tbitmap :) Но вроде как более материален, чем непонятный HDC :)

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c