Displaying in Anders GIF

Return to index

Author

Message

Allen

Posted: 02/24/2003 20:49:11

Hello,

I am trying the Anders Melander TGifImage, and when I insert the picture

into a RichViewEdit, it won't animate. It just display the gif:

VAR : Mygif: TGifImage;

      T    : TImage;

begin

MyGif := TGIFImage.Create;

      T := TImage.Create(self);

          MyGif.LoadFromFile('c:\ani.gif');

              T.Picture.Assign(MyGIF);

               RV.InsertControl('',T,rvvaBaseline);

                                   MyGif.Free;

                                end;

---------------------------------

Do please give a hint.

Thanks.