-- [フォントリストを返すムービースクリプト]
on xGetInstalledFonts
tempFontMember = new(#font) -- フォントキャストメンバーを生成
lFontsList = tempFontMember.fontList() -- フォントリストを取得
tempFontMember.erase() -- フォントキャストメンバーを削除
return lFontsList -- フォントリストを返す
end
各ステートメントの処理につきましては、コメントをご参照ください。メッセージウィンドウで試すと、以下のような結果が返ります。
[メッセージウィンドウからの実行例]
put xGetInstalledFonts()
-- ["Zapf Dingbats", "Wingdings", "Webdings", "Verdana", "Trebuchet MS", "Times New Roman", "Times", "Textile", "Techno", "Symbol", "Sand", "Palatino", "Osaka", "Osaka−等幅", "New York", "MT Extra", "Monotype.com", "Monotype Sorts", "Monaco", "Minion Web", "Impact", "Helvetica", "Georgia", "Geneva", "Gadget", "Courier New", "Courier", "Comic Sans MS", "Chicago", "Charcoal", "Capitals", "Arial Black", "Arial", "Andale Mono", "平成明朝 W3", "平成明朝", "平成角ゴシック W5", "平成角ゴシック", "中ゴシック体", "細明朝体"]