Si la valeur de #Gadget est #PB_Default, alors la police par défaut utilisée par les nouveaux gadgets est changée par la nouvelle valeur.
Si la valeur de 'PoliceID' est #PB_Default, alors la police par défaut du système d'exploitation sera utilisée.
Exemple:
If OpenWindow(0, 0, 0, 222, 130, "SetGadgetFont", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
If LoadFont(0, "Arial", 16)
SetGadgetFont(#PB_Default, FontID(0)) ; la police par défaut est remplacée par celle chargée (Arial 16)
EndIf
ButtonGadget(0, 10, 10, 200, 30, "Bouton - Arial 16")
SetGadgetFont(#PB_Default, #PB_Default) ; remet la police par défaut originale (standard)
ButtonGadget(1, 10, 50, 200, 30, "Bouton - standard")
If LoadFont(1,"Courier",10, #PB_Font_Bold|#PB_Font_Underline)
SetGadgetFont(#PB_Default, FontID(1)) ; la police par défaut est remplacée par celle chargée (Courier 10)
EndIf
TextGadget(2, 10, 90, 200, 40, "Texte en Courier 10 Gras + souligné", #PB_Text_Center)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
