![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Анимация
zoltan © (2004-04-21 17:01:00)Мужики нада компонент для анимации всех классов из TImage!
И если есть код (пример) анимации дайте плз!!!!!
zoltan (2004-04-22 14:38:00) [1]ПОМОГИТЕ НАДА ПОЗАРЕЗ!!!!!!!!!!!!!!!!
zoltan (2004-04-22 14:22:00) [2]Boson отзовись!!!
C@N (2004-04-22 14:15:00) [3]Я в молодости:) делал так:
в таймере
.
..
...
i:=i+1;
image1.piucture.loadfromfile('..\..\image'+inttostr(i)+'.bmp');
...
..
.
zoltan (2004-04-22 14:09:00) [4]Моя ася 114971329
zoltan (2004-04-22 14:03:00) [5]скомпилировал и в на форме рисуеться картинка такаяже как и фрейм
помогите плз!!!
Boson (2004-04-22 08:00: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);
Надеюсь я ничего не пропустил.
Boson (2004-04-22 07:48:00) [7]Хош подробнее - щяссссссс.......
Boson (2004-04-22 07:47:00) [8]>>можно както проводить анимацию через skanline
var
p:^Pointer;
for i:=0 to Высота TImage1 do
begin
p:=TImage1.scanlines[i];
p^:=TImage2.scanlines[i];
end;
вместо Pointerа должен быть ^массив пикселей
zoltan (2004-04-22 01:53:00) [9]т.е все зарег. классы форматво т.е bmp jpg png pcd tiff другие
если можно както проводить анимацию через scanline подскажите как
!!!
zoltan (2004-04-22 01:52:00) [10]т.е все зарег. классы форматво т.е bmp jpg png pcd tiff другие
если можно както проводить анимацию через skanline подскажите как
!!!
Алхимик (2004-04-21 18:47:00) [11]Что есть
> анимации всех классов из TImage!
?