ChangeListIconGadgetDisplay() et thèmes XP
Publié : dim. 30/juil./2006 5:47
Le code en fin de message plante si on active les thèmes XP mais ne plante pas s'il ne sont pas activés.
Si on met en commentaire la création de la colonne de la 2eme ListIcon ou si on met en commentaire la ligne ChangeListIconGadgetDisplay(0, #PB_ListIcon_SmallIcon)
ça ne plante plus
Même problème avec #PB_ListIcon_LargeIcon
Je ne vois pas ce qui cloche
Si on met en commentaire la création de la colonne de la 2eme ListIcon ou si on met en commentaire la ligne ChangeListIconGadgetDisplay(0, #PB_ListIcon_SmallIcon)
ça ne plante plus
Même problème avec #PB_ListIcon_LargeIcon
Je ne vois pas ce qui cloche
Code : Tout sélectionner
If OpenWindow(0, 0, 0, 630, 370, " Item image", #PB_Window_ScreenCentered | #PB_Window_SystemMenu)
If CreateGadgetList(WindowID(0))
If ListIconGadget(0, 8, 1, 300, 150, "Colonne 1 ", 298 / 4, #PB_ListIcon_MultiSelect | #PB_ListIcon_FullRowSelect)
If CreateImage(0, 16, 16, 24)
AddGadgetColumn(0, 1, "Colonne 2", 298 / 4)
AddGadgetColumn(0, 2, "Colonne 3", 298 / 4)
AddGadgetColumn(0, 3, "Colonne 4", 298 / 4)
AddGadgetItem(0, -1, "111" + Chr(10) + "222" + Chr(10) + "333" + Chr(10) + "444", ImageID(0))
EndIf
If ListIconGadget(1, 319, 1, 300, 150, "Colonne 1 ", 298 / 4, #PB_ListIcon_MultiSelect | #PB_ListIcon_FullRowSelect)
AddGadgetColumn(1, 1, "Colonne 2", 150)
AddGadgetItem(1, -1, "111")
ChangeListIconGadgetDisplay(0, #PB_ListIcon_SmallIcon)
;- boucle
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
EndIf
EndIf
EndIf
End