PureBasic

J'ai un problème avec le gadget ListIconGadget. En utilisant les flèches de l'ascenseur dans une liste assez longue, la grille n'est pas bien rafraîchie. Des traits supplémentaires apparaissent. Ce bug apparaît lorsque l'on active les thèmes XP.
Je ne vois pas très bien comment m'en sortir.
Cordialement.
Frédéric L.

avec quelle version de purebasic ?

Avec la version 3.94 sous windows.

Tu n'aurais pas un exemple de code afin de pouvoir tester sur la v4 ?

LeCyb a écrit :Tu n'aurais pas un exemple de code afin de pouvoir tester sur la v4 ?

Tu prends WinDestroyer, tu ouvres un dossier où y'a plein de fichier (genre le dossier de windows, system32 etc...) et changes l'affichage en "détail". Ca me le fait sous windows 98 et XP

Dri

Voilà un bout de code. En activant les thèmes XP celà devrait permettre de se rendre compte.
Cordialement.
Fred L.


Enumeration
#fenetre
#ListIconGadget1
#gadSplitter
#gadEditor
EndEnumeration

#CCM_SETVERSION = #CCM_FIRST + 7

If OpenWindow(#fenetre, 0, 0, 400, 320, #PB_Window_ScreenCentered | #PB_Window_SystemMenu, "test") And CreateGadgetList(WindowID())
ListGadget = ListIconGadget(#ListIconGadget1, 0, 0, 0, 0, "0", 350/4, #PB_ListIcon_GridLines )
EditorGadget(#gadEditor,0,0,0,0)
SplitterGadget(#gadSplitter,10,10,380,300,1,#gadEditor)
SendMessage_(ListGadget, #CCM_SETVERSION, 5, 0)
AddGadgetColumn(#ListIconGadget1, 1, "1", 350/4)
AddGadgetColumn(#ListIconGadget1, 2, "2", 350/4)
AddGadgetColumn(#ListIconGadget1, 3, "3", 350/4)
For i = 0 To 300
AddGadgetItem(#ListIconGadget1, -1, "L"+Str(i)+"C0" + Chr(10) + "L"+Str(i)+"C1" + Chr(10) + "L"+Str(i)+"C2"+ Chr(10) +"L"+Str(i)+"C3"+ Chr(10) )
Next i

Repeat
If WaitWindowEvent() = #PB_EventCloseWindow
Break
EndIf
ForEver
EndIf
End