[R] Installer une police ?

[XcessiV]

Bonjour.

Dans un de mes scripts, je souhaite utiliser une police bien précise, il me faut donc l'embarquer dans mon soft quand je le compile.

J'ai testé avec

Code : Tout sélectionner

FileInstall("C:\Documents and Settings\xcessiv\My Documents\Privé\deathrattlebb_reg.ttf", "C:\WINDOWS\Fonts\deathrattlebb_reg.ttf")

Mais cela n'as pas l'air de fonctionner...
Les font s'installent apparement...

Vous avez une idée ?

[Voodoo]

Je sais que cela marche si tu copie colle le fichier. Donc tu le fileinstall dans le repertoire de ton script par exemple et tu le filecopy ou filemove.

[sylvanie]

Attention, un fileinstall dans C:\Windows\... nécessite des droit suffisant pour réaliser l'écriture.
Si l'exe est lancé avec un compte utilisateur simple et que C:\windows est réservé en écriture qu'à des compte admin, ça ne risque pas de marcher

[XcessiV]

Voila comment j'ai fait (trouvé sur le fofo officiel) :

Code : Tout sélectionner

FileInstall("C:\Documents and Settings\XcessiV\My Documents\Privé\deathrattlebb_reg.ttf", "C:\temp\deathrattlebb_reg.ttf")

FileChangeDir (@ScriptDir)
$FontFile="C:\temp\deathrattlebb_reg.ttf"
_FontInstall ( $FontFile )

Func _FontInstall ( $FontFile )
    FileCopy ( $FontFile, @WindowsDir & "\Fonts" ,1 )
    Run("explorer " & @WindowsDir & "\Fonts", "", @SW_HIDE)
    WinWait("Fonts")
    WinClose("Fonts")
    EndFunc

[sylvanie]

cool, merci pour l'info