Discussion :

[Invité]

Bonjour.

Tous les sujets relatifs aux GIFs et qu'on peut trouver dans Google sont antérieurs à la sortie de Lazarus 1.6. J'ai déjà réussi sans problème à charger un gif animé dans un composant image standard. Puis-je le faire "bouger" ?

Merci d'avance

[Jipété]

Salut,

Tous les sujets relatifs aux GIFs et qu'on peut trouver dans Google sont antérieurs à la sortie de Lazarus 1.6. J'ai déjà réussi sans problème à charger un gif animé dans un composant image standard. Puis-je le faire "bouger" ?

Merci d'avance

Avec 1.6 je ne sais pas : je n'ai toujours pas migré... Avec 1.4 la réponse est oui, mais ça n'est pas aussi simple qu'on pourrait croire : en son temps j'ai trouvé un compo TGifAnim qui devrait pouvoir encore se trouver (enfin, j'espère : je n'ai pas cherché -- aide pour la recherche : Wile64 [c'est le nom de l'onglet d'installation]), mais ces choses (je parle au pluriel car sous Delphi il y a longtemps j'en avais testé d'autres) sont très sensibles à des GIF's mal formés et qui pourtant s'affichent bien dans le navigateur Internet...

Exemple d'erreur : Classe d'exception FPImageException Invalid palette index 255. et pourtant il s'affiche bien avec le visualiseur d'images de mon Linux.
Bon courage...

[Invité]

mais la compilation plante sur "GetControlClassDefaultSize".

Tant pis, sans regrets si c'est un composant "à problèmes", et merci ...

[Roland Chastain]

Bonjour !

Je ne comprends pas pourquoi vous avez marqué la discussion comme "résolue" alors que manifestement elle ne l'est pas.

Autrement, une solution pour afficher un GIF animé, c'est la bibliothèque BGRABitmap. J'ai trouvé un exemple fonctionnel sur le forum anglophone :

http://forum.lazarus.freepascal.org/....html#msg98280

Pour votre commodité, je l'attache à ce message. Je l'ai testé avec succès sous Windows, avec Lazarus 1.6.

Voir aussi cet exemple donné par l'auteur de BGRABitmap lui-même :

http://forum.lazarus.freepascal.org/...html#msg157566

L'exemple est basé sur les composants BGRAControls, mais on peut quand même s'en inspirer.

Bon courage !

[ApproxDev]

Bonjour,

Oui li ne faut peut-être pas abandonner si vite. J'avais rencontré un exemple que je viens de "déterrer" et vérifier sous Lazarus 1.6/fpc 3.0 en Win 7 et Mint 17.3 [32 tous les 2]. Dans ma base de données, il est noté qu'il y avait une petit erreur ligne 154 du MemBitmap.pas pour fonctionner sous Linux.

Cordialement. AD

[Invité]

Bonjour.

Merci pour ta réponse, mais j'ai jeté un coup d'oeil, la mise en oeuvre est trop compliquée par rapport à l'usage que je veux en faire, juste afficher un LOGO animé sur la fiche d'un logiciel (dont l'unité principale ne fait même pas 210 lignes de déclarations et code, et qui se compose d'une image fixe, d'une led et d'un timer ! ) : l'animation ne fait absolument pas partie de l'usage principal .... Merci quand même.

[Jipété]

Dans ma base de données, il est noté qu'il y avait une petit erreur ligne 154 du MemBitmap.pas pour fonctionner sous Linux.

Cordialement. AD

Dans mon MemBitmap.pas, des lignes 151 à 160, j'ai ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
uses FPWritePng, GraphType, LCLIntf, LCLType
{$IFDEF LCLgtk2}
  {$DEFINE gtkbugfix}
  ,gdk2,gtk2Def, gtk2Proc
{$ENDIF}
{$IFDEF LCLgtk}
  {$DEFINE gtkbugfix}
  ,gdk,gtkDef, gtkProc
{$ENDIF}
;

Je suis sous Linux et ça fonctionne (du peu que j'en ai testé...)