Archive for 12月 5th, 2012

  1. Hello, Java 2D(Clojure) World!

    Posted on 12月 5th, 2012 by cx20

    Java 2D

    Java 2D は Java による 2D グラフィックライブラリである。
    以下は Clojure による Java 2D の使用例となっている。

    ソースコード

    (import 
      (javax.swing JFrame)
      (javax.swing JPanel)
      (java.awt Graphics)
      (java.awt Graphics2D))
     
    (defn create-panel []
      (proxy [JPanel] []
        (paintComponent [g]
          (.drawString g "Hello, Java 2D World!" 0 16))))
     
    (def panel
      (create-panel))
     
    (def frame
      (JFrame.))
     
    (doto frame
      (.setDefaultCloseOperation
        javax.swing.WindowConstants/EXIT_ON_CLOSE)
      (.add panel)
      (.setSize 640 480)
      (.setTitle "Hello, World")
      (.setVisible true))

    実行方法

    C:¥> clj Hello.py

    実行結果

    +------------------------------------------+
    |Hello, World!                    [_][~][X]|
    +------------------------------------------+
    |Hello, Java 2D World!                     |
    |                                          |
    |                                          |
    |                                          |
    |                                          |
    |                                          |
    |                                          |
    |                                          |
    |                                          |
    |                                          |
    +------------------------------------------+