Cette fonction permet de créer un nouvelle Font basée et identique à celle passée en paramètre.

A chaque création d'une Font doit correspondre un appel de la fonction GdipDeleteFont() qui permet de libérer les ressources associées à la Font.

L'exemple crée une FontFamily de type Times New Roman, ensuite crée une police (Font) avec le style #FontStyleBold | #FontStyleItalic d'une taille de 35 pixels, clone cette Font et puis affiche une chaîne de texte sur le graphique avec la police clonée.
La chaîne affichée par la fonction GdipDrawDriverString() doit être au format unicode, quelque soit le mode du compilateur PureBasic.

Si la fonction réussit, elle retourne #Ok qui est une constante de l'énumération status.
Si la fonction échoue, elle retourne une des autres valeurs de l'énumération status.

PureBasic v4.30 bêta 4 (Windows - x86)
Testé avec Windows Vista édition familiale Premium