question sur les fonts et Global

[bernard13]

bonsoir
juste une petite question

quand on charge une font
avec Global
dois t'on imperativement mettre la fonte la moins grosse en premier

exemple je veux mettre un texte en font 12
et un stringgadget en font 11

donc faut'il mettre la fonte de 11 en premier
puis celle de 12 apres ?


merci

[Le Soldat Inconnu]

pas saisi ....

Il n'y a pas d'ordre pour déclarer les Font, on s'en moque totalement, le tout, c'est quel soit créer avant que est besion de les utiliser

[bernard13]

essaye ceci :

Code : Tout sélectionner

si tu change la taille de la font 1  ca bug 
par contre la font 2 marche 
alors Régis tu peux m'expliquer ce bug ? 


Enumeration
  #w1
  EndEnumeration
  
  Enumeration
    
    #text_1
    #text_2    
   
   EndEnumeration
    Global FontId1
   FontId1=LoadFont(FontId1,"Arial",12,#pb_font_bold)
   
   Global FontId2
   FontId2=LoadFont(FontId2,"Arial",11,#pb_font_bold)
  

     
  Procedure ww()
  
  If OpenWindow(#w1,0,0,450,250,#pb_window_systemmenu|#pb_window_titlebar|#pb_window_screencentered,"exemple")
  

  
  
  
  If CreateGadgetList(WindowID())
  
  TextGadget(#text_1,160,50,130,25,"arial 12  : " ,#pb_text_center)
  SetGadgetFont(#text_1,fontId1)
 
   
  TextGadget(#text_2,160,100,130,25,"arial 11  : " ,#pb_text_center)
  SetGadgetFont(#text_2,fontId2)

  
  
  EndIf
  
  
  
  EndIf
  EndProcedure
  
  ww()
  
  Repeat 
  Select WaitWindowEvent()
   Case #pb_event_closewindow
   fermer=1
   EndSelect
   Until fermer=1
   End
   

[Droopy]

Tu gère mal LoadFont
voici la correction

Code : Tout sélectionner

Global FontId1 
FontId1=LoadFont(#text_1,"Arial",12,#PB_Font_Bold) 
    
Global FontId2 
FontId2=LoadFont(#text_2,"Arial",11,#PB_Font_Bold) 

[Le Soldat Inconnu]

Code : Tout sélectionner

Global FontId1 
   FontId1=LoadFont(FontId1,"Arial",12,#pb_font_bold) 
    
   Global FontId2 
   FontId2=LoadFont(FontId2,"Arial",11,#pb_font_bold)

regarde, tu mets une variable global à la place de l'identifiant de la police.

Comme il n'y a pas de valeur dans fontId1 et FontID2 quand tu fait loadFont, c'est comme si tu avais ceci :

Code : Tout sélectionner

Global FontId1 
   FontId1=LoadFont(0,"Arial",12,#pb_font_bold) 
    
   Global FontId2 
   FontId2=LoadFont(0,"Arial",11,#pb_font_bold)

Donc tu charges 2 fois une police d'itenfiant 0

Soit tu utilises #PB_Any

Code : Tout sélectionner

Global FontId1 
   FontId1=LoadFont(#PB_Any,"Arial",12,#pb_font_bold) 
    
   Global FontId2 
   FontId2=LoadFont(#PB_Any,"Arial",11,#pb_font_bold)

Soit une constante pour chaque font

Code : Tout sélectionner

Enumeration
  #Font1
  #Font2
EndEnumeration
   Global FontId1 
   FontId1=LoadFont(#Font1,"Arial",12,#pb_font_bold) 
    
   Global FontId2 
   FontId2=LoadFont(#Font2,"Arial",11,#pb_font_bold)

[bernard13]

merci regis
mais ca pas marche
j'ai beau changer la taille de la fonte
ca marche pas

[bernard13]

c'est curieux
que FontId2 ca marche
mais pas fontid1

[Torp]

Argh!

[bernard13]

peux tu m'aider Torp svp


comment tu fais toi pour charger er utiliser des FontS?

[Torp]

LSI te l'a montré juste au dessus !

[bernard13]

oui mais ça marche pas
et j'ai remarquer le fichier d'exemple appeller
font.pb ne marche pas , on vois la fenetre et pas les fonts
j'ai tester sur 3pc different et c'est le meme probleme

[Le Soldat Inconnu]

Code : Tout sélectionner

Enumeration
  ; Window
  #w1
  ; Gadget
  #text_1
  #text_2
  ; Font
  #Font1
  #Font2
EndEnumeration

Global FontId1, FontId2
FontId1 = LoadFont(#Font1, "Arial", 14, #PB_Font_Bold)
FontId2 = LoadFont(#Font2, "Arial", 11, #PB_Font_Bold)



Procedure ww()
  
  If OpenWindow(#w1, 0, 0, 450, 250, #PB_Window_SystemMenu | #PB_Window_TitleBar | #PB_Window_ScreenCentered, "exemple")

    If CreateGadgetList(WindowID())
      
      TextGadget(#text_1, 160, 50, 130, 25, "arial 12  : ", #PB_Text_Center)
      SetGadgetFont(#text_1, FontId1)

      TextGadget(#text_2, 160, 100, 130, 25, "arial 11  : ", #PB_Text_Center)
      SetGadgetFont(#text_2, FontId2)
      
    EndIf

  EndIf
EndProcedure

ww()

Repeat
  Select WaitWindowEvent()
    Case #PB_Event_CloseWindow
      fermer = 1
  EndSelect
Until fermer = 1
End

[bernard13]

merci régis
j'ai passer des heures a chercher une solution
merci

[gansta93]

Pourtant, à peu de choses près, c la même chose qu'il postait comme code...

[Jacobus]

Pourtant, à peu de choses près, c la même chose qu'il postait comme code...

C'est bien souvent là qu'est toute la différence.

#FontID1 et FontID1 c'est pas vraiment la même chose...