MirGames

Подскажите как создать анимацию:

додумался до этого:


AnimCount := 2;
AnimLooped := True;
AnimSpeed := 7 / 1000;

DXImageList1.Items.Add;
with DXImageList1.Items[0] do
begin
Picture.LoadFromFile('delta.bmp');
Name:='Delta';
PatternWidth:=37;
PatternHeight:=37;
SkipHeight:=0;
SkipWidth:=0;
SystemMemory:=False;
Transparent:=True;
TransparentColor:=clWhite;
restore;
end;

Как это привязать к Направлению движения спрайта ???
т.е. если спрайт движется вверх то и треугольник направлен вверх?
P.S. 2а кадра в анимации, Кадры брать из 1ой картинки.