DESCRIPTION.

La fonction PROC_imgPlot() retourne la largeur et la hauteur initiale d'une image chargée en mémoire.

SYNTAXE.

PROC_imgSize( image , largeur , hauteur )

REMARQUES.

image doit être l'identifiant de : 

- l'image créé avec l'appel de la fonction FN_imgLoad() ;

- l'image d'une animation désignée l'appel de la fonction FN_imgFrame().

largeur et hauteur doivent être les identifiants des variables qui recevront les valeur correspondantes. Si les variables identifiée par largeur et hauteur n'existent pas, elles seront crées .Si les variables identifiée par largeur et hauteur existe déjà, leur valeur seront modifiée.

Rappel : la procédure PROC_imgInit devra toujours être appelée avant tout autre fonction ou procédure de imglib.bbc.

La procédure PROC_imgSize() 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 ---

kimage = FN_imgLoad( "monimage.jpg" )

IF kimage <> 0 THEN

PROC_imgSize( kimage , klargeur , khauteur )

IF ( klargeur * 2 ) > 1200 THEN khorizontal = 1200 / ( klargeur * 2 ) ELSE khorizontal = 1

IF ( khauteur * 2 ) > 950 THEN kvertical = 950 / ( khauteur * 2 ) ELSE kvertical = 1

IF khorizontal < kvertical THEN kzoom = khorizontal ELSE kzoom = kvertical

PRINT "Zoom = "   kzoom

PROC_imgPlot( kimage , 640 , 500 , kzoom , kzoom , 0 )

ELSE 

PRINT "Le fichier image est introuvable !"

ENDIF

REM --- Fin du programme ---

PROC_imgExit

END