Ajoute une ressource de police, à partir d'un fichier spécifié, dans la table des polices système
#include <WinAPIGdi.au3>
_WinAPI_AddFontResourceEx ( $sFont [, $iFlag = 0 [, $bNotify = False]] )
| $sFont | Chaîne qui contient un nom de fichier de police valide. Ce paramètre peut spécifier un fichier d'un des types suivants: .fon - Fichier de ressources de police. .fnt - Fichier de police bitmap Raw. .ttf - Fichier TrueType Raw. .ttc - Windows Asie de l'Est: collection de polices TrueType. .fot - Fichier de ressources TrueType. .otf - Police PostScript OpenType. .mmm - Fichier de ressources de police Multiple Master Type1. Il doit être utilisé avec des fichiers .pfm et .pfb. .pfb - Fichier de police de bits de type 1. Elle est utilisé avec un fichier .pfm. .pfm - Fichier de police métrique de type 1. elle est utilisée avec un fichier .pfb. Pour ajouter une police dont les informations proviennent de plusieurs fichiers de ressources, ils doivent être séparés par un "|". Par exemple, abcxxxxx.pfm | abcxxxxx.pfb. |
| $iFlag | [optionnel] Les caractéristiques de la police à ajouter au système. Ce paramètre peut prendre l'une des valeurs suivantes: $FR_PRIVATE $FR_NOT_ENUM |
| $bNotify | [optionnel] Spécifie s'il faut envoyer un message WM_FONTCHANGE, les valeurs valides sont: True - Envoyer le message WM_FONTCHANGE à toutes les fenêtres de haut niveau après avoir changé la file des ressources de police. False - Ne pas envoyer de message (par défaut). |
| Succès: | Retourne la valeur qui spécifie le nombre de polices ajoutées. |
| Échec: | Retourne 0. |
Cette fonction installe la police que pour la session en cours. Lorsque le système redémarrera, la police ne sera pas présente.
Pour avoir la police installée même après le redémarrage du système, la police doit être inscrite dans le registre.
Consultez AddFontResourceEx dans la librairie MSDN.
#include <APIGdiConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WinAPIGdi.au3> _WinAPI_AddFontResourceEx(@ScriptDir & '\Extras\SF Square Head Bold.ttf', $FR_PRIVATE) GUICreate('Test '& StringReplace(@ScriptName, '.au3', '()'), 400, 100) GUICtrlCreateLabel('Simple Text', 10, 25, 380, 50, $SS_CENTER) GUICtrlSetFont(-1, 38, -1, -1, 'SF Square Head Bold') GUICtrlSetColor(-1, 0xF06000) GUISetState(@SW_SHOW) Do Until GUIGetMsg() = $GUI_EVENT_CLOSE