DESCRIPTION.

La procédure PROC_setlistboxarray() modifie le contenu d'une liste fixe de sélections.

SYNTAXE.

PROC_setlistboxarray( boite , controle , donnees , elements )

REMARQUES.

boite doit être l'identifiant de la boite de dialogue qui à laquelle la fonction de rappelle est associée. Il s'agit du nom de la variable qui a reçu la valeur retournée par la fonction FN_newdialog() pour la création de boite.

controle doit être l'identifiant de la liste fixe de sélections dont le contenu doit être modifié.

donnees doit être l'identifiant d'un tableau de données, ne contenant que des chaines de caractères (type $) les valeurs numériques donnant des comportements indésirables, contenant les nouvelles valeurs de la liste à modifiée. donnees ne doit pas forcément être toujours le même tableau de données, une liste fixe ou déroulante de sélections n'étant pas liée définitivement au premier tableau de données qui lui est associé.

elements doit être un nombre entier indiquant le nombre d'éléments, ou items, provenant de données qui doivent être insérés dans la liste fixe ou déroulante de sélections. Si elements est supérieur à l'index du dernier élément de données. des sélections vide, non sélectionnables, seront placées dans la liste fixe ou déroulante de sélection. 

Rappel : le premier élément de donnees, ayant l'index 0, n'est pas inséré comme élément d'une liste fixe ou déroulante de sélections. Les valeurs de sélections vont donc de donnees( 1 ) à donnees( elements ).

Voir la fonction FN_newdialog() qui permet de déclarer et de créer une boite de dialogue. 

Voir la procédure PROC_listbox() qui crée une liste fixe de choix dans une boite de dialogue.

Voir la procédure PROC_combobox() qui crée une liste déroulante de choix dans une boite de dialogue.

La procédure PROC_setlistboxarray() est importée depuis le module dlglib.bbc. 

EXEMPLE.

REM --- Importation des modules ---

REM --- Module de la bibliothèque BBC BASIC ---

INSTALL @lib$ + "dlglib.bbc"

REM --- Chargement de la police de caracteres par defaut ---

OSCLI "FONT """ + @lib$ + "DejaVuSans"",12" 

REM --- Initialisation des elements de la liste ---

DIM LST_Choix$( 10 ) 

FOR kindex = 0 TO 10 : LST_Choix$( kindex ) = "Element " + CHR$( 65 + kindex ) : NEXT kindex

REM --- Creation d'une boite de dialogue nommee DLG_Test de 160 x 60 unites intitulee Test ---

DLG_Test = FN_newdialog( "Test ..." , 60 , 100 )

kselection = FN_setproc( PROC_Action() )

REM --- Creation des controles de la boite de dialogue ---

PROC_button( DLG_Test , "Fermer." , 8 , 10 , 80 , 40 , 15 , 0 )

PROC_listbox( DLG_Test , "" , kselection , 5 , 5 , 50 , 70 , 0 ) 

PROC_setlistboxarray( DLG_Test , kselection , LST_Choix$() , 7 )

REM --- Affichage de la boite de dialogue et attende des choix de l'utilisateur ---

kcontrole = FN_showdialog( DLG_Test , &FFFFFFFF80000000 , &FFFFFFFF80000000 )  

REM --- Fermeture de la boite de dialogue ---

PROC_closedialog( DLG_Test ) 

REM --- Fin du programme ---

PRINT : PRINT "Au revoir."

END

REM --- DEFINITION DES METHODES PERSONNALISEES ---

REM --- Procedures d'appel de la boite de dialogue DLG_Test ---

DEF PROC_Action( Qboite , Qliste ) : PRINT TAB( 0 , 0 ) FN_getdlgitemtext( Qboite , Qliste ) : ENDPROC