Анимация

← →
zoltan (2004-04-21 17:01) [0]

Мужики нада компонент для анимации всех классов из TImage!
И если есть код (пример) анимации дайте плз!!!!!

← →
Алхимик © (2004-04-21 18:47) [1]

Что есть

> анимации всех классов из TImage!

?

← →
zoltan (2004-04-22 01:52) [2]

т.е все зарег. классы форматво т.е bmp jpg png pcd tiff другие
если можно както проводить анимацию через skanline подскажите как
!!!

← →
zoltan (2004-04-22 01:53) [3]

т.е все зарег. классы форматво т.е bmp jpg png pcd tiff другие
если можно както проводить анимацию через scanline подскажите как
!!!

← →
Boson (2004-04-22 07:47) [4]

>>можно както проводить анимацию через skanline
var
p:^Pointer;

for i:=0 to Высота TImage1 do
begin
p:=TImage1.scanlines[i];
p^:=TImage2.scanlines[i];

end;

вместо Pointerа должен быть ^массив пикселей

← →
Boson (2004-04-22 07:48) [5]

Хош подробнее - щяссссссс.......

← →
Boson (2004-04-22 08:00) [6]

Buf :Timage //Приемник,или временный имадж Frame :Timage //Это кадр который нуна порисовать(ессна ,должен быть не пуст) i :integer; p,p1 :pointer; размеры Buf = размеры Frame for i:=0 to Frame.Height-1 do begin p:=buf.Scanlines[i]; p1:=Frame.Scanlines[i]; CopyMemory(p,p1,Frame.Width*3); end; Canvas.Draw(x,y,Buf);

Надеюсь я ничего не пропустил.

← →
zoltan (2004-04-22 14:03) [7]

скомпилировал и в на форме рисуеться картинка такаяже как и фрейм
помогите плз!!!

← →
zoltan (2004-04-22 14:09) [8]

Моя ася 114971329

Я в молодости:) делал так:
в таймере
.
..
...
i:=i+1;
image1.piucture.loadfromfile("..\..\image"+inttostr(i)+".bmp");
...
..
.

← →
zoltan (2004-04-22 14:22) [10]

Boson отзовись!!!

← →
zoltan (2004-04-22 14:38) [11]

ПОМОГИТЕ НАДА ПОЗАРЕЗ!!!!!!!!!!!!!!!!

Анимация Найти похожие ветки