[Résolu] Ajouter un élément à une liste
Publié : dim. 03/avr./2011 19:07
Bonsoir à tous,
Voici mon problème:
En faite, j'ai une liste vide mais j'aimerais rajouter des choses comme je le souhaite grâce à un bouton ainsi qu'un gadget de saisie de texte.
Et quand je tape quelque chose dans le gadget de saisie, celui se rajoute dans la liste en cliquant sur le bouton.
Enfin, voici le code pour mieux comprendre:
Merci
Voici mon problème:
En faite, j'ai une liste vide mais j'aimerais rajouter des choses comme je le souhaite grâce à un bouton ainsi qu'un gadget de saisie de texte.
Et quand je tape quelque chose dans le gadget de saisie, celui se rajoute dans la liste en cliquant sur le bouton.
Enfin, voici le code pour mieux comprendre:
Code : Tout sélectionner
Enumeration
#fenetre
#liste
#add
#text
EndEnumeration
OpenWindow(#fenetre, 0, 0 , 800, 600, "test", #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_TitleBar | #PB_Window_MinimizeGadget)
ListViewGadget(#liste, 10, 10, 200, 580)
ButtonGadget(#add, 300, 10, 100, 25, "ajouter")
StringGadget(#text, 300, 50, 100, 25, "Ajouter")
Repeat
Select WaitWindowEvent()
Case #PB_Event_Gadget
Select EventGadget()
Case #add
AddGadgetItem(#text, 0, text$)
EndSelect
Case #PB_Event_CloseWindow
Fermer=#True
EndSelect
Until fermer