GIF not playing in Delphi 10.3

[dormky 1]

It doesn't adapt the image size to the control size. Mods, please delete this post 🙂

Edited March 6 by dormky

[JohnLM 10]

1. add a timage to the form.

2. load the a picture via Object Inspector window (or load via code) 

3. use the following code snippet in a button event or other area of your source code. 

 

note: if the image is large and you shrink it, it may animate with image distortions. 

  form1.DoubleBuffered := true;
  (image1.picture.graphic as TGifImage).Animate := true;
  (image1.picture.graphic as TFifImage).AnimationSpeed := 150;

 

Edited March 6 by JohnLM