Bruce Powell wrote:
>...
> QUESTION: Is there some way for me to locate all font typefaces used by
> castmember? It could even be a space with a not wanted font on it.
I was unable to put the font of a particular character in a field so I took this route
(tested in 8.5 Mac):
on findfont cLib, soughtFont
mems = the number of castmembers of castLib cLIb
put soughtFont && "found in:"
repeat with x = 1 to mems
if getpos([#field, #text, #richtext, #button], member(x).type) then
testmem = duplicate(member(x, cLib))
charCount = member(testmem).text.char.count
repeat with y = 1 to charCount
if member(testmem).font = soughtFont then
put member(x, cLib) && "character" && y
end if
delete member(testmem).char[1]
end repeat
erase member(testmem)
end if
end repeat
end
example call:
findfont(1,"Arial")
It's pretty verbose, but it's pretty thorough too.
Have a ball.
--
Carl West [EMAIL PROTECTED] http://eisen.home.attbi.com
I have no superfluous leisure; my stay must be stolen out
of other affairs; but I will attend you awhile.
- Isabella, Measure for Measure, Act 3 Scene 1
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/lingo-l.cgi To post messages to the list, email
[EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED]). Lingo-L is for
learning and helping with programming Lingo. Thanks!]
