Installation de police [Résolu]

cs_windsurfer 20 Messages postés vendredi 30 janvier 2004Date d'inscription 26 juin 2008 Dernière intervention - 30 janv. 2008 à 13:47 - Dernière réponse : cs_windsurfer 20 Messages postés vendredi 30 janvier 2004Date d'inscription 26 juin 2008 Dernière intervention
- 31 janv. 2008 à 17:34
salut

j'ai coder un programme, fprime disponible sur http:\mathatoto.chez-alice.fr.
Ce prog nécessite l'installation d'une police de caractère fprime.ttf qui devrait se copier automatiquement dans windows\fonts à l'installation de fprime.
J'ai des pb pour installer cette police depuis mon logiciel :

Parfois ça marche sans pb et la police est dispo immédiatement.
Parfois il faut redémarrer le système pour que la police soit prise en compte.
Parfois la police ne se copie pas du tout dans windows\fonts\

Y-a-t-il une technique infaïble ?

toto le windsurfer
Afficher la suite 

2 réponses

Répondre au sujet
WhiteHippo 1270 Messages postés samedi 14 août 2004Date d'inscription 5 avril 2012 Dernière intervention - 31 janv. 2008 à 17:01
+3
Utile
Bonjour

Je ne sais pas si cela va te convenir, mais au lieu d'installer la police TTF dans le repertoire de Windows, tu peux juste déclarer au système que tu as besoin de la police située dans tel repertoire :

procedure TForm1.FormCreate(Sender: TObject) ;
begin
  // On indique où se situe la police TTF à déclarer
  AddFontResource('X:\MonReperoire\MonFichier.TTF') ;

  // On informe le système qu'il doit mettre à jour ses polices
  SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0) ;
end;

procedure TForm1.FormDestroy(Sender: TObject; var Action: TCloseAction);
begin
  // On indique où se situe la police TTF à "oublier"
  RemoveFontResource('X:\MonReperoire\MonFichier.TTF');

  // On informe le système qu'il doit mettre à jour ses polices
  SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0) ;
end;

Si toutefois, tu souhaites toujours installer la police dans le reperoire fonts, il faut au préalable, vérifier que le fichier n'est pas déjà présent, puis ensuite appliquer de la même façon le code du FormCreate :

  AddFontResource('C:\WIndows\Fonts\FFrime.ttf') ;
  SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0) ;

Cordialement.
<hr />"L'imagination est plus importante que le savoir." Albert Einstein
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de WhiteHippo
cs_windsurfer 20 Messages postés vendredi 30 janvier 2004Date d'inscription 26 juin 2008 Dernière intervention - 31 janv. 2008 à 17:34
0
Utile
formidable merci beaucoup

toto le windsurfer
Commenter la réponse de cs_windsurfer

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.