[RESOLUS] ListeIcone sélectionner en gris

[microdevweb]

Bonjour,
Voici mon petit problème, lorsque je sélectionne un item de ma liste icone par programmation setGadgetState(#Gadget,State?) la ligne sélectionnée est en gris clair. J'aurais aimé quelle soit en bleu comme quant la sélectionne manuelemnt.

Merci d'avance.

[Ar-S]

Salut,
ce n'est pas

Code : Tout sélectionner

SetGadgetItemColor(#Gadget, Element, TypeCouleur, Couleur [, Colonne])

que tu cherches ?

[Kwai chang caine]

Bah chez moi avec le focus ça marche

Code : Tout sélectionner

If OpenWindow(0, 0, 0, 690, 300, "ListIconGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) 
    
 ListIconGadget(0,  10,  25, 300, 70, "Colonne 1", 100)
 
 For b = 0 To 2 
  AddGadgetItem(0, b, "Elément")
 Next
 
 SetActiveGadget(0)
 SetGadgetState(0, 0) 
 
  Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

[Ar-S]

En gros si tu sélectionnes l'item actif, le texte se met en surbrillance (bleu comme le souligne KCC) .
Si tu veux colorer toute la cellule sélectionnée, utilise SetGadgetItemColor() (pratique pour visualiser une sélection multiple.
à toi ensuite d'utiliser les event souris pour créer une liste de fichiers sélectionnés.

Code : Tout sélectionner

If OpenWindow(0, 0, 0, 690, 300, "ListIconGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  
  ListIconGadget(0,  10,  25, 300, 70, "Colonne 1", 100)
  
  For b = 0 To 2
    AddGadgetItem(0, b, "Elément")
  Next
  
  SetActiveGadget(0)
  SetGadgetState(0, 0)
  SetGadgetItemColor(0, 0, #PB_Gadget_BackColor, $00CCFF, 0)
  
  
  
  Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

[microdevweb]

Merci Kwai chang caine et Ar-S,

C'est SetActiveGadget(#Gadget) qui me manquait, problème résolus...

Merci encore

[microdevweb]

Bonjour,
Voici mon petit problème, lorsque je sélectionne un item de ma liste icone par programmation setGadgetState(#Gadget,State?) la ligne sélectionnée est en gris clair. J'aurais aimé quelle soit en bleu comme quant la sélectionne manuelemnt.

Merci d'avance.