ExplorerListGadget() et ChangeListIconGadgetDisplay()

[Chris]

Bug d'affichage quand on est en mode "Petites icones", et qu'on entre dans un dosier contenant des fichiers avec des noms très longs.

Si la longueur des noms est plus grande que la largeur des colonnes, le nom du fichier qui se trouve à côté se trouve décalé dans la colonne suivante.



Voilà un bout de code pour essayer.

Code : Tout sélectionner

If OpenWindow(0,0,0,400,240,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"ExplorerListGadget") And CreateGadgetList(WindowID(0))
  ExplorerListGadget(0, 10, 10, 380, 180, "*.*", #PB_Explorer_MultiSelect)
  ButtonGadget(1, 10, 200, 70, 20, "G. Icônes")
  ButtonGadget(2, 90, 200, 70, 20, "P. Icônes")
  ButtonGadget(3, 170, 200, 70, 20, "Liste")
  ButtonGadget(4, 250, 200, 70, 20, "Detail")
  
  ChangeListIconGadgetDisplay(0, 1)
  
  Repeat
    Event = WaitWindowEvent()
    Select Event
      Case #PB_EventGadget
        Select EventGadgetID()
          Case 1
            ChangeListIconGadgetDisplay(0, 0)
            
          Case 2
            ChangeListIconGadgetDisplay(0, 1)
            
          Case 3
            ChangeListIconGadgetDisplay(0, 2)
            
          Case 4
            ChangeListIconGadgetDisplay(0, 3)
            
        EndSelect
    EndSelect
    
  Until Event=#PB_Event_CloseWindow
EndIf