Clear Embedded Font

 

Compatibilities:

This item has not yet been rated

The script will clear any or all embedded font members specified. This should be placed in a movieScript.

-- place in a moviescript and call from the message window on clearEmbeddedFonts (fontName) castCount = the number of castLibs repeat with j = 1 to castCount memCount = the number of members of castlib j put memCount repeat with k = 1 to memCount if member(k, j).type <> #font then next repeat Case fontName of #all: member(k, j).erase() otherwise if member(k, j).font = fontName then member(k, j).erase() end Case if the paramCount = 2 and param(2) then msg = "deleted font member" && k && "from castLib" && j alert(msg) end if end repeat end repeat end -- you can pass these parameters: -- param 1 : either the name of the font, for example "Arial *" or #all -- param 2 : either 1 (True) or 0 (False) to provide an alert msg to indicate the member that was erased. -- eg. -- from message window: -- clearEmbeddedFonts("Arial *", 0) -- with no alert -- clearEmbeddedFonts("Arial *", 1) -- with an alert -- clearEmbeddedFonts(#all) -- clears all the fonts with no alert

Upload Provided by ABCUpload ASP