Pb avec LstIconGadget

Archive.
Fred L.
Messages : 3
Inscription : lun. 17/avr./2006 21:35

Pb avec LstIconGadget

Message par Fred L. »

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.
Avatar de l’utilisateur
Flype
Messages : 2431
Inscription : jeu. 29/janv./2004 0:26
Localisation : Nantes

Message par Flype »

avec quelle version de purebasic ?
Image
Fred L.
Messages : 3
Inscription : lun. 17/avr./2006 21:35

Message par Fred L. »

Avec la version 3.94 sous windows.
LeCyb
Messages : 273
Inscription : dim. 26/déc./2004 20:49

Message par LeCyb »

Tu n'aurais pas un exemple de code afin de pouvoir tester sur la v4 ?
Vive le thread-safe !
Dr. Dri
Messages : 2527
Inscription : ven. 23/janv./2004 18:10

Message par Dr. Dri »

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
Fred L.
Messages : 3
Inscription : lun. 17/avr./2006 21:35

Message par Fred L. »

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
Répondre