ActivateFonts Code

HomeScript KatalogForumSkripteDPS SkripteSuDokuNummerierungWörterbuchFaszinierendes
 
PlugInsKatalogImNuJavaScriptDokumenteBücherLinksSchulungenVideosInDesign Tipps

ActivateFonts für InDesign
  1. -- Copyright InDesignScript.de
  2. -- Stefan Rakete
  3. -- www.indesignscript.de
  4.  
  5. -- Install Fonts für Objekt XYZ
  6.  
  7.  
  8. property targetPath : "Macintosh HD:Applications:Adobe InDesign CS2:Fonts"
  9. -- Zielordner anpassen
  10.  
  11. set user_name_short to system attribute "USER"
  12. set sourcePath to "Macintosh HD:Users:" & user_name_short & ":Dokumente:Fonts:Objekt XYZ"
  13.  
  14. tell application "Finder"
  15. --Delete all Alias Fonts in the InDesign Fonts folder
  16. delete items in folder targetPath
  17. if not (exists targetPath & ":Objekt XYZ") then
  18. make new alias to sourcePath at folder targetPath
  19. end if
  20. end tell