Page 1 sur 1

Pb 4.20 Bêta 3

Publié : dim. 06/avr./2008 12:40
par nico
Lorsque qu'une combo n'a plus qu'un item et qu'on fait RemoveGadgetItem pour supprimer ce dernier item et bien il apparait toujours sauf si on rafraichit le gadget!!!!

Code : Tout sélectionner

  If OpenWindow(0, 0, 0, 270, 140, "ComboBoxGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
   CreateGadgetList(WindowID(0))
   ComboBoxGadget(0, 10, 10, 250, 100)
   AddGadgetItem(0, -1, "ComboBox")
   ButtonGadget(1, 10, 40, 250, 20,"Delete")

   SetGadgetState(0, 0)
   Repeat
    Select WaitWindowEvent()
        Case #PB_Event_Gadget
            Select EventGadget()  
                Case 1
                    Select EventType()
                        Case #PB_EventType_LeftClick
                            RemoveGadgetItem(0,0)
                    EndSelect 
            EndSelect 
            
        Case #WM_CLOSE
            Quit=1
    EndSelect
    Until Quit=1    
  EndIf
Vous pouvez me confirmer le problème chez vous?

Publié : dim. 06/avr./2008 12:46
par Neosis
Je c'est pas si ya vraiment un problème mais j'ai trouvé une façon de triché :)
Rajoute juste
SetGadgetText après RemoveGadgetItem

If OpenWindow(0, 0, 0, 270, 140, "ComboBoxGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
CreateGadgetList(WindowID(0))
ComboBoxGadget(0, 10, 10, 250, 100)
AddGadgetItem(0, -1, "ComboBox editable...")
ButtonGadget(1, 10, 40, 250, 20,"Delete")

SetGadgetState(0, 0)
Repeat
Select WaitWindowEvent()
Case #PB_Event_Gadget
Select EventGadget()
Case 1
Select EventType()
Case #PB_EventType_LeftClick
RemoveGadgetItem(0,0)
SetGadgetText(0,"")
EndSelect
EndSelect

Case #WM_CLOSE
Quit=1
EndSelect
Until Quit=1
EndIf

Publié : dim. 06/avr./2008 12:52
par nico
Heu si ça reste un problème quand même :roll:

En plus si la Combo est éditable, l'item reste même si on rafraichit le gadget!