⇨ MENU ⇨ BIBLIOTHEQUE ⇨ imglib.bbc
FN_imgFrame()
⇨ MENU ⇨ BIBLIOTHEQUE ⇨ imglib.bbc
FN_imgFrame()
DESCRIPTION.
La fonction FN_imgFrame() indique quelle image d'une animation d'un fichier .gif devra être affichée.
SYNTAXE.
kduree = FN_imgFrame( animation , image )
REMARQUES.
animation doit être l'identifiant de l'animation créé avec l'appel de la fonctions FN_imgLoadAnimatedGIF().
image doit être 0 ou un nombre entier positif.
L'appel de la fonction FN_imgFrame() retourne une valeur numérique qui devra affecter une variable, indiquant une durée en en centièmes de seconde, pendant laquelle cette image doit être affichée.
Note : Si la valeur retournée par la fonction FN_imgFrame() est 0, zéro, cela indique que la valeur de image est incorrecte, trop élévée ou négative par exemple. Il est donc important de controler cette valeur juste après l'appel de la fonction FN_imgFrame() afin de s'assurer que le programme ne cherche pas a afficher une image invalide.
Rappel : la procédure PROC_imgInit devra toujours être appelée avant tout autre fonction ou procédure de imglib.bbc.
La fonction FN_imgFrame() est importée depuis le module imglib.bbc.
RUBRIQUES.
Les dessins et les graphismes pour plus de détails sur la création de dessins et de graphismes.
La gestion des couleurs pour plus de détails sur la gestion des couleurs logiques et physiques.
EXEMPLE.
REM --- Importation des modules ---
REM --- Module de la bibliothèque BBC BASIC ---
INSTALL @lib$ + "imglib.bbc"
REM --- INITIALISATION GENERALE ---
PROC_imgInit
MODE 8
REM --- chargement des images ---
kanimation = FN_imgLoadAnimatedGIF( "monimage.gif" )
IF kanimation <> 0 THEN PROC_Afficher( kanimation ) ELSE PRINT "Le fichier animation est introuvable !"
REM --- Fin du programme ---
PROC_imgExit
END
REM --- Affichage avec zoom ---
DEF PROC_Afficher( Q )
PRINT "Appuyer sur Q pour quitter ... "
kimage = 0
REPEAT
kduree = FN_imgFrame( Q , kimage )
IF kduree <> 0 THEN kimage = kimage + 1 ELSE kimage = 0
PRINT TAB( 0 , 3 ) "Image : " ; kimage
PROC_imgPlot( Q , 640 , 500 , 1 , 1 , 0 )
ktouche$ = INKEY$( 10 )
UNTIL ktouche$ = "Q" OR ktouche$ = "q"
ENDPROC
Votre aide est précieuse pour améliorer ce site, alors n'hésitez pas à faire part de
Dans la RETROGICIEL vous trouvez des suggestions simples et classiques pour
TESTER - DÉCOUVRIR - PRATIQUER - APPROFONDIR - EXPLORER
avec un exemple de résolution à télécharger pour vous inspirer.