RichTextAreaについて

[heavybugtracker]

上記いずれも、RichTextArea.data-model （RichTextStringDataModel)の属性変更で実現可能と思います。
例：

Code:

{let rta:RichTextArea =
  {RichTextArea value={RichTextString.from-string "Tメイリョウ日本語２２ｐｔest"},
    {on AttachEvent do
      {(rta.data-model asa RichTextStringDataModel).set-attribute "font-family", "メイリオ"}
      {(rta.data-model asa RichTextStringDataModel).set-attribute "font-size", 22pt}

    }
  }
}

{value rta}