But isn't it just easier to filter out the unicode fonts and just list
the ANSI fonts like I did in my original post?
I'm just not sure of the need to actually list the unicode fonts, unless
you're providing support in a program for these languages.
-Garrett
Devin Asay wrote:
I'm in obsessive mode with unicode. Here's the new and improved version:
on mouseUp
put empty into fld "fontList"
put the fontNames into fNames
sort lines of fNames by word 1 of each
put fnames
repeat for each line tLine in fNames
if char 1 of tLine is "#" then
put uniencode(tLine,"Korean") & uniencode(cr,"ANSI") after fld
"fontList"
else
put uniencode(tLine,"Japanese") & uniencode(cr,"ANSI") after fld
"fontList"
end if
end repeat
delete char -2 to -1 of fld "fontList"
set the textFont of line 1 to -1 of fld "fontList" to the textFont of
fld "fontList","Japanese"
set the scroll of fld "fontList" to 0
end mouseUp
There still may be some problems, but since I can't read Chinese or
Japanese, I have to trust that those font names came out properly.
On Mar 8, 2006, at 3:26 PM, Devin Asay wrote:
on mouseUp
put empty into fld "fontList"
repeat with i = 1 to number of lines in the fontNames
put uniencode(line i of the fontNames,"Japanese") &
uniencode(cr,"ANSI") after fld "fontList"
end repeat
set the textFont of line 1 to -1 of fld "fontList" to the textFont
of fld "fontList","Japanese"
end mouseUp
This gets it *mostly* right, I think.
Devin Asay
Humanities Technology and Research Support Center
Brigham Young University
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your
subscription preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
