Вопрос по DelphiX

[Kudesnik]

Как поменять image в созданном спрайте! Например при:

Procedure TPlayerSprite.DoMove(MoveCount: Integer);
begin
inherited DoMove(MoveCount);
if isLeft in Form1.DXInput1.States then
begin
//Что здесь нужно прописать, чтобы Image поменялся???
end;
end;


//Создание спрайта

type
TPlayerSprite = class(TImageSprite)
protected
procedure DoMove(MoveCount: Integer); override;
end;

//-----------

procedure TForm1.FormCreate(Sender: TObject);
begin
with TPlayerSprite.Create(DXSpriteEngine1.Engine) do
begin
PixelCheck := True;
Image := form1.dxImageList1.Items.Find('k8');//Image Который надо поменять
x:=350;
y:=500;
Width:=Image.Width;
Height:=Image.Height;
end;