[RESOLU] Couleur de text ignorée

[omega]

Bonjour

Je ne comprends pas pourquoi la couleur du texte (dans ma ListIconGadget) ne s'applique pas ??

Merci de votre aide

Code : Tout sélectionner

Enumeration
  #Fenetre
  #Police
  #grid
  #Message
  #Pseudo
EndEnumeration  

wlig=0

OpenWindow(#Fenetre, 0, 0, 800, 560,"test tchat", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
LoadFont(#Police, "Tahoma", 12) 
SetGadgetFont(#PB_Default, FontID(#Police)) 
ListIconGadget(#grid, 10, 10, 780, 490,"Pseudo", 100) ;,#PB_ListIcon_GridLines | #PB_ListIcon_FullRowSelect)
AddGadgetColumn(#Grid,1,Space(48)+"Message",680)

StringGadget(#Message, 190, 510, 610,30, "")
StringGadget(#Pseudo, 10, 510, 170, 30, "")

SetGadgetColor(#grid,#PB_Gadget_BackColor,RGB(238, 232, 170))
SetGadgetItemColor(#grid, #PB_All, #PB_Gadget_FrontColor,RGB(0, 139, 139),0)

Pseudo$="Omega"
Message$="Salut !"

;Pour test
AddGadgetItem(#grid,wlig,Pseudo$ + Chr(10)  + Message$) 

;Pouquoi le pseudo n'est pas affiché dans la couleur définie?

Repeat
 Event = WaitWindowEvent()

 If Event = #PB_Event_CloseWindow  
   End
 EndIf
   
ForEver

 

[Marc56]

Erreur ligne 21
SetGadgetColor <> SetGadgetItemColor()
Toute la grille

Code : Tout sélectionner

SetGadgetColor(#grid,#PB_Gadget_BackColor,RGB(238, 232, 170))
SetGadgetColor(#grid, #PB_Gadget_FrontColor,RGB(0, 139, 139))

SetGadgetItemColor est utilisé pour colorer chaque élément après.
SetGadgetItemColor doit être appliqué après l'insertion

Code : Tout sélectionner

AddGadgetItem(#grid,wlig,Pseudo$ + Chr(10)  + Message$) 
SetGadgetItemColor(#grid, #PB_All, #PB_Gadget_FrontColor,RGB(0, 139, 139),0)

[Ar-S]

;Pouquoi le pseudo n'est pas affiché dans la couleur définie?

Salut.
Peut être parce que tu coloris un truc qui n'est pas encore créé...

Fais d'abord ton AddGadgetItem(#grid,wlig,Pseudo$ + Chr(10) + Message$)
puis gère tes couleurs !

---edit--- arf Marc !

[omega]

Merci à vous tous

Effectivement, il fallait appliquer la couleur après l'insertion. Chose que je ne savais pas.

Merci beaucoup