サンプルをゴニョゴニョいじってみる。 (:=) でプロパティをセット。 module Main where import Graphics.UI.WX main :: IO () main = start hello hello :: IO () hello = do f <- frame [text := "日本語はUTF8で!"] p <- panel f [] title <- get f text …