| GAMEMASTERです。
> いや、インクルード中で使いたいので…それだと使う度にセットしないといけないですから。
その場合、Fontコマンドの実行と変数の記録を同時に行うサブルーチンを作成し、フォントの設定を変更する際にFontコマンドを実行する代わりにこのサブルーチンを呼び出すようにするという手があります。
Set フォント設定 ""
FontSet "16pt #000000 P明朝 Bold 通常"
PaintString - - message
FontSet:
Local i
For i = 1 To LLength(Args(1))
Font LIndex(Args(1),i)
Next
フォント設定 = Args(1)
Return
参考になれば幸いです。
もう時間がないようでございますね。では、これにて退散させてもらいましょう。
|