{"blog_title":"sirocco \u306e\u66f8\u3044\u3066\u3082\u3059\u3050\u306b\u5fd8\u308c\u308b\u30e1\u30e2","author_url":"https://blog.hatena.ne.jp/sirocco/","image_url":"https://cdn-ak.f.st-hatena.com/images/fotolife/s/sirocco/20100624/20100624105504.jpg","type":"rich","categories":["Haskell","wxHaskell"],"blog_url":"https://sirocco.hatenadiary.org/","description":"\u30b5\u30f3\u30d7\u30eb\u3092\u30b4\u30cb\u30e7\u30b4\u30cb\u30e7\u3044\u3058\u3063\u3066\u307f\u308b\u3002 (:=) \u3067\u30d7\u30ed\u30d1\u30c6\u30a3\u3092\u30bb\u30c3\u30c8\u3002 module Main where import Graphics.UI.WX main :: IO () main = start hello hello :: IO () hello = do f <- frame [text := \"\u65e5\u672c\u8a9e\u306fUTF8\u3067!\"] p <- panel f [] title <- get f text -- frame \u306e text \u3092\u53d6\u5f97 -- \u7d42\u4e86\u3001\u8868\u793a\u30dc\u30bf\u30f3\u306e\u5b9a\u7fa9\u3002 p \u306f\u89aa\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306e\u30d1\u30cd\u30eb\u3002 quit <- button p [text := \"\u7d42\u4e86\", on command \u2026","height":"190","provider_name":"Hatena Blog","title":"wxHaskell \u3092\u4f7f\u3063\u3066\u307f\u308b\u3002","provider_url":"https://hatena.blog","version":"1.0","url":"https://sirocco.hatenadiary.org/entry/20100624/1277344570","published":"2010-06-24 10:56:10","author_name":"sirocco","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fsirocco.hatenadiary.org%2Fentry%2F20100624%2F1277344570\" title=\"wxHaskell \u3092\u4f7f\u3063\u3066\u307f\u308b\u3002 - sirocco \u306e\u66f8\u3044\u3066\u3082\u3059\u3050\u306b\u5fd8\u308c\u308b\u30e1\u30e2\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","width":"100%"}