RichView проблема с Gif картинками

[SERG1980]

Вот код с помощью которого загружаю гиф картинку в ричвиев

{$R *.dfm}
{$R Smails.res}
procedure TForm1.Button1Click(Sender: TObject);
var gif:TGifImage;
begin
 gif:=TGifImage.Create;
 gif.LoadFromFile('d:\2.gif');
 form1.RichView1.AddPictureEx('',gif,-1,rvvaMiddle);
end;

 initialization
  RegisterClass(TGifImage);
end.

проблема в том что картинка не двигается, но если мышкой кликать по RichView то при каждом клике наблюдается покадровое движение картинки. Как сделать чтобы она сама двигалась?
Да ещёвидел вот такой способ вставки картинки

rve.InsertPicture....

но у меня такого метода нет. Версия компонента 10,4

[raxp]

>>>> тырк...

[SERG1980]

Спасибо за "тырк" но всё тоже самое. Может компонент глючный или я кривой

[VAM]

А Вы не смогли бы показать Ваш код полностью как делаете ?

[SERG1980]

Сообщение от VAM

А Вы не смогли бы показать Ваш код полностью как делаете ?

Да вроде как в первом посте указал

procedure TForm1.Button1Click(Sender: TObject);
var gif:TGifImage;
begin
 gif:=TGifImage.Create;
 gif.LoadFromFile('d:\2.gif');
 form1.RichView1.AddPictureEx('',gif,-1,rvvaMiddle);
 form1.RichView1.Format;
end;

 initialization
  RegisterClass(TGifImage);
end.