DESCRIPTION.

La fonction FN_imgLoad() charge un fichier image en mémoire et retourne un pointeur pour sa localisation.

SYNTAXE.

kimage = FN_imgLoad( fichier )

REMARQUES.

fichier doit être le nom d'un fichier image de format BMP, GIF, JPG, PNG, PSD, PPM ou TGA existant. L'emplacement de fichier peut être exprimé de façon relative ou absolue. Si le format de fichier gère le canal alpha, coulmeur de transparence, celui-ci sera pris en compte lors de l'affichage de l'image. 

L'appel de la fonction FN_imgLoad() retourne une valeur numérique qui devra affecter une variable, indiquant par un pointeur l'emplacement de l'image dans la mémoire. 

Note : Si la valeur retournée par la  fonction FN_imgLoad() est 0, zéro, indique que fichier n'a pas pu être ouvert. Il est donc important de controler cette valeur juste après l'appel de la fonction FN_imgLoad() afin de s'assurer que le programme ne cherche pas a afficher une image non chargée.

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

La fonction FN_imgLoad() 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_Afficher( kimage ) ELSE PRINT "Le fichier image est introuvable !"

REM --- Fin du programme ---

PROC_imgExit

END

REM --- Affichage d'une image ---

DEF PROC_Afficher( Q )

REM --- Affichage avec zoom ---

DEF PROC_Afficher( Q )

FOR kvaleur = 5 TO 20

kzoom = kvaleur / 10 

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

WAIT( 50 )

CLS

NEXT kvaleur

REM --- Affichage avec mise a echelle et centre ---

PROC_imgSize( Q , 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( Q , 640 , 500 , kzoom , kzoom , 0 )

ENDPROC