Comment déclarer une police Windows.

Demandé et répondu par R&B le 03-Jun-2005 13:29

Comment déclarer une police Windows.

Par Mathieu Kurth :

Après avoir copié le fichier "C:\Windows\Fonts" lancer le code suivant pour déclarer la police.

strPath est une chaîne = fSélecteur("", "", "Sélectionnez un fichier...", 
"Tous fichiers (*.*)"+TAB+"*.*", "*.*", fselOuvre+fselExiste)
SI strPath <> "" ALORS
   strPath += Caract(0)
   API("Gdi32","AddFontResourceA",&strPath)
FIN

Cette Q&R a été trouvée sur WDForge.org : http://old.wdforge.org/modules/smartfaq/faq.php?faqid=98