ListIconGadget et #PB_ListIcon_Checked

Archive.
Anonyme2
Messages : 3518
Inscription : jeu. 22/janv./2004 14:31
Localisation : Sourans

ListIconGadget et #PB_ListIcon_Checked

Message par Anonyme2 »

Bug PB ou MS ?

J'avais un fonctionnement étrange d'un de mes outils et j'ai trouvé ça:

Le problème se recontre lorsque la ListIcon a le mode #PB_ListIcon_CheckBoxes

L'exemple suivant montre l'erreur

La liste est vide et GetGadgetItemState(#ListIconGadget1, 0) retourne #PB_ListIcon_Checked :roll:

J'avais ces valeurs retournées dans une boucle et je ne testais pas si la liste était vide puisque si la liste est vide on ne devrait pas retourner #PB_ListIcon_Checked .

Le problème est valable pour d'autres éléments que le 1er lorsque la liste est vide

Code : Tout sélectionner

#ListIconGadget1 = 1
; ; ;=========================================================================
; ; ;=========================================================================

If OpenWindow(0, 0, 0, 420, 420, #PB_Window_ScreenCentered | #PB_Window_SystemMenu, "List vide et #PB_ListIcon_Checked") And CreateGadgetList(WindowID())
  ListIconGadget(#ListIconGadget1, 10, 10, 400, 310, "0", 480 / 9,  #PB_ListIcon_CheckBoxes)
  
  ButtonGadget(1000, 60, 330, 300, 65, "Quitter" )
  SetGadgetFont(1000, LoadFont(4000, "ARIAL", 16, #PB_Font_Bold))
  
  For i = 1 To 6
    AddGadgetColumn(#ListIconGadget1, i, Str(i), 470 / 9)
  Next i
  
  ; ici la liste est vide, on affiche l'état du 1er élément
  
  Debug GetGadgetItemState(#ListIconGadget1, 0)
  Debug GetGadgetItemState(#ListIconGadget1, 0) & #PB_ListIcon_Checked
  
  Repeat
    Select WaitWindowEvent()
      Case #PB_EventGadget
        Select EventGadgetID()
          Case 1000
            Quit + 1
            
        EndSelect
        
      Case #PB_EventCloseWindow
            Quit + 1
        
    EndSelect
    
  Until Quit
EndIf
End
Fred
Site Admin
Messages : 2808
Inscription : mer. 21/janv./2004 11:03

Message par Fred »

Effectivement, je vais corriger ca de suite.
Fred
Site Admin
Messages : 2808
Inscription : mer. 21/janv./2004 11:03

Message par Fred »

Corrigé. La nouvelle lib est dispo ici: www.purebasic.com/beta/GadgetExtension
Répondre