Re: Animinated Gif

Return to index

Author

Message

Sergey Tkachenko

Posted: 09/18/2002 21:13:01

Hi,

RichView does not support animated images directly yet.

Load animation in some component which can play it, and inset this component

into RichView.

>

> Hi,

>

> I try to insert the animinated gif into the rve. I made the following

steps.

>

> 1. modify the program RVFuncs.pas

> 2. insert function as follow

>

> procedure My_AfterImportGraphic(Graphic: TGraphic);

> begin

> if Graphic is TGifImage then

> TGifImage(Graphic).DrawOptions :=

TGifImage(Graphic).DrawOptions-[goAnimate];

> end;

>

> 3. alter ther initialization steps

>

> initialization

>   RV_CreateGraphics := RV_CreateGraphicsDefault;

>   {RV_AfterImportGraphic := RV_AfterImportGraphicDefault; }

>   RV_AfterImportGraphic := My_AfterImportGraphic;

> end.

>

> 4. recompile again.

>

> when i try my application i insert the gif into the rve. It dosen't work

> but the graphic size is chane e.g. the size which include the animinated

> path which the size is big enought to hole the animinated gif but it won't

> animiated.

>

> Any idea?

>

> Cheers