Page 1 sur 1

LoadFont

Publié : sam. 31/juil./2004 15:26
par Aranoth
Salut !

Petits problèmes avec LoadFont...

1) A quoi ca sert ?! ca marche pas pour DrawText, ca marche pas pour MessageRequester....c'est inutiles ou quoi ? :twisted:

2) Comment je peut faire pour faire que DrawText utilise Arial taille 8 en italique...

Code : Tout sélectionner

;- Font
LoadFont(0, "Arial", 8, #PB_Font_Italic)
UseFont(0)
Merci :wink:

Publié : sam. 31/juil./2004 17:05
par Chris
Mais si ça fonctionne!

Code : Tout sélectionner

;/Constantes Window
Enumeration
  #Window_0
EndEnumeration

;/Constantes Gadget
Enumeration
  #Btn_Quit
EndEnumeration

Enumeration
  #Font1
  #Font2
EndEnumeration

IdFont1 = LoadFont(#Font1,"arial",26,#PB_Font_Italic)
IdFont2 = LoadFont(#Font2,"Comic Sans MS",26,#PB_Font_Bold)

If OpenWindow(#Window_0, 300, 300, 300, 200, #PB_Window_SystemMenu, "Fenêtre 1",0)
  
  If CreateGadgetList(WindowID(#Window_0))
    
    SetGadgetFont(#PB_Default,UseFont(#Font1))
    ;SetGadgetFont(#PB_Default,IdFont1)
    
    ButtonGadget(#Btn_Quit, 50, 100, 200, 100, "Quitter")
  EndIf
  
  Repeat
    StartDrawing(WindowOutput())
    
    DrawingFont(UseFont(#Font2)): DrawingMode(1)
    ;DrawingFont(IdFont2): DrawingMode(1)
    
    Locate(30,10)
    DrawText("Essai de texte")
    StopDrawing()
    
    Select WaitWindowEvent()
      Case #PB_EventGadget
        Select EventGadgetID()
          
          Case #Btn_Quit : quit = 1
        EndSelect
        
      Case #PB_EventCloseWindow : quit = 1
    EndSelect
  Until quit = 1
  End
EndIf

Publié : sam. 31/juil./2004 18:33
par Aranoth
aah !

j'avais pas vu la commande DrawingFont()...elle était dans 2DDrawing et pas dans Font....

oops excusez moi :oops:

merci :wink: