I was challenged a couple of days ago to install a Type 1 font.

Here's how I did it:

  1. Open new Project in Installshield ( Flexera Software)
  2. INSTALLDIR = [ProgramFilesFolder]Lexicon Font
  3. Create new Feature -  new Component ( Destination: INSTALLDIR)
  4. Add the Font files ( afm, inf, pfb, pfm ..) in component
  5. Create Custom Action (51)
    Property Name = InstallFont
    Property Value = [INSTALLDIR]
    Location : after CostFinalize 
  6. Create CA ( 3110)
    Set objShell = CreateObject("Shell.Application")
    Set objFolder = objShell.NameSpace(Property("CustomActionData"))
    Set objFolderItem = objFolder.ParseName("LexiconNo1ATxt-Regular.pfm")
    objFolderItem.InvokeVerb("Install")
  7. Deferred Execution in System Context ( After StartServices )
  8. screenshots