Changeset 6913 for lang/scala

Timestamp:

02/19/08 15:13:24 (9 months ago)

Author:

kmizu

Message:

 

Files:

• lang/scala/sandbox/src/jp/gr/java_conf/mizu/gui/GUIBuilder.scala (modified) (1 diff)

lang/scala/sandbox/src/jp/gr/java_conf/mizu/gui/GUIBuilder.scala

@@ -2 +2 @@
 
 import scala.util.DynamicVariable
-import java.awt._
-import javax.swing._
+import java.awt.Container
+import java.awt.event.ActionEvent
+import javax.swing.JFrame
+import javax.swing.JButton
+import javax.swing.Action
+import javax.swing.AbstractAction
+import jp.gr.java_conf.mizu.util.ReflectionWrapper._
 
-trait GUIBuilder {
-  val container = new DynamicVariable[Container](null)
-  def Frame(params :Any*)(thunk : => Unit) : JFrame = {
+class GUIBuilder {
+  val context :DynamicVariable[AnyRef] = new DynamicVariable[AnyRef](null)
+        def setProperty(target :AnyRef, property :Symbol, value :Any) {
+          invoke(context, "set" + property.name.capitalize, value)
+        }
+        def getProperty(target :AnyRef, property :Symbol, value :Any) :Any = {
+          invoke(context, "set" + property.name.capitalize, value)
+        }
+  def frame(params :Any*)(thunk : => Unit) : JFrame = {
     val frame = new JFrame
     params.foreach {
     case title:String => frame.setTitle(title)
-    case (property:Symbol, value:Any) => ()
-    case _ => ()
+    case (property:Symbol, value:Any) => setProperty(frame, property, value)
     }
-    container.withValue(frame)(thunk)
+    context.withValue(frame)(thunk)
     frame
   }
+        def button(params :Any*) :JButton = {
+          val button = new JButton
+                context.value match {
+                case frame:JFrame => frame.getContentPane.add(button)
+                case container:Container => container.add(button)
+                }
+                params.foreach {
+                case text:String => button.setText(text)
+                case (property:Symbol, value:Any) => setProperty(button, property, value)
+                }
+                button
+        }
+        def action(handler :ActionEvent => Unit) :Action = {
+          new AbstractAction {
+                  def actionPerformed(e :ActionEvent) = handler(e)
+                }
+        }
 }