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 ?
2) Comment je peut faire pour faire que DrawText utilise Arial taille 8 en italique...
Merci

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
merci
