Page 1 sur 1

Modifier la police d'un ListViewGadget

Publié : dim. 20/oct./2013 16:10
par Philippe_GEORGES
Bonjour

Je souhaite changer la police d'un ListViewGadget. Visiblement, le code suivant ne marche pas....

Code : Tout sélectionner

 LoadFont (0, "Arial", 10) ;Load Courrier Font, Size 1
  SetGadgetFont(#Resultats,FontID(0))
#Resultat est une constante se rapportant au gadget ListViewGadget destiné à recevoir du texte ....

Pourquoi ce code ne fonctionne pas, alors qu'appliquer à un editorgadget ça marche ?

J'utilise la version 5.20 de purebasic sous Windows 8.

Merci d'avance de votre aide....

Phil

Re: Modifier la police d'un ListViewGadget

Publié : dim. 20/oct./2013 16:57
par falsam
Même version de Pure Basic et ça fonctionne

Code : Tout sélectionner

Enumeration 
  #Font
  #MainForm
  #Resultat
EndEnumeration

LoadFont (#Font, "Arial", 12)

If OpenWindow(#MainForm,0, 0, 300, 150, "ListViewGadget",#PB_Window_SystemMenu | #PB_Window_ScreenCentered) 
  ListViewGadget(#Resultat, 10, 10, 280, 130)
  SetGadgetFont(#Resultat, FontID(#Font))
  For a=1 To 12
    AddGadgetItem (#Resultat,-1,"Elément "+Str(a)+" de la boîte à liste")   ; défini le contenu de la boîte de liste
  Next
  
  Repeat : Until WaitWindowEvent()=#PB_Event_CloseWindow
EndIf
Test sous Windows 7 et 8

Re: Modifier la police d'un ListViewGadget

Publié : dim. 20/oct./2013 17:04
par falsam
Petite astuce : Si tous les gadgets de ta fenêtre sont concernés par cette police, tu peux placer

Code : Tout sélectionner

SetGadgetFont(#PB_Default, FontID(#Font))
avant l'ouverture de ta fenêtre. Ca évite de faire un SetGadgetFont() pour chacun des gadgets de la fenêtre.

Re: Modifier la police d'un ListViewGadget

Publié : mar. 22/oct./2013 15:50
par Philippe_GEORGES
Merci, là ça marche !!

En fait, le gadget ID doit être préalablement déclaré sous forme de constante....

Bien compris !! Un très grand merci ! :P

Phil