Page 1 of 1

Fonts Intalling

Posted: Mon Jul 24, 2017 9:11 am
by Eytan

Re: Fonts Intalling

Posted: Mon Jul 24, 2017 10:00 am
by ggrewe
I have had the same problem, cannot get any fonts to install. As a workaround, I have written a VB script to runs post install and this solves my issue. Hopefully, fonts can be installed and the problem is resolved in some future release.

Code: Select all

Set ofso = CreateObject("Scripting.FileSystemObject")
SourceFolder = ofso.GetParentFolderName(Wscript.ScriptFullName)

Const FONTS = &H14&

Set objShell  = CreateObject("Shell.Application")
Set oSource   = objShell.Namespace(SourceFolder)
Set oWinFonts = objShell.Namespace(FONTS)

Set rxTTF = New RegExp
rxTTF.IgnoreCase = True
rxTTF.Pattern = "\.ttf$"

FOR EACH FontFile IN oSource.Items()
    IF rxTTF.Test(FontFile.Path) THEN   
        oWinFonts.CopyHere FontFile.Path
    END IF
NEXT

Re: Fonts Intalling

Posted: Thu Sep 12, 2019 7:44 am
by Leo
New version of Actual Installer handles font installations.
Just select the menu "Tools \ Add Font" and follow the instruction.