Commits

Anonymous committed 84cbd59

PopupWindow support

  • Participants
  • Parent commits 6f70441

Comments (0)

Files changed (2)

File src/de/matthiasmann/twlscala/PopupWindow.scala

+/*
+ * Copyright (c) 2008-2009, Matthias Mann
+ *
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are met:
+ *
+ *     * Redistributions of source code must retain the above copyright notice,
+ *       this list of conditions and the following disclaimer.
+ *     * Redistributions in binary form must reproduce the above copyright
+ *       notice, this list of conditions and the following disclaimer in the
+ *       documentation and/or other materials provided with the distribution.
+ *     * Neither the name of Matthias Mann nor the names of its contributors may
+ *       be used to endorse or promote products derived from this software
+ *       without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+ * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+ * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
+ * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
+ * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+ * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+ * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+ * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+ * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+ * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+ * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+package de.matthiasmann.twlscala
+
+import twlinternal._
+import de.matthiasmann.twl.{Widget => TWLWidget, PopupWindow => TWLPopupWindow}
+
+class PopupWindow(owner:TWLWidget) extends TWLPopupWindow(owner) with ThemeSupport with Reactor {
+    theme = "popupwindow"
+    def closeOnClickedOutside = isCloseOnClickedOutside
+    def closeOnClickedOutside_= (b:Boolean) { setCloseOnClickedOutside(b) }
+    def closeOnEscape = isCloseOnEscape
+    def closeOnEscape_= (b:Boolean) { setCloseOnEscape(b) }
+}

File src/de/matthiasmann/twlscala/TWL.scala

 }
 
 class TWL {
-    import de.matthiasmann.twl.GUI
+    import de.matthiasmann.twl.{GUI, PopupWindow}
     import de.matthiasmann.twl.theme.ThemeManager
 
     val renderer = new de.matthiasmann.twl.renderer.lwjgl.LWJGLRenderer
         }
     }
 
+    def waitForPopup(p:PopupWindow) {
+        import org.lwjgl.opengl.{GL11, Display}
+        while(p.isOpen) {
+            GL11.glClear(GL11.GL_COLOR_BUFFER_BIT|GL11.GL_DEPTH_BUFFER_BIT)
+            gui.update
+            Display.update
+        }
+    }
+
+    def showPopup(p:PopupWindow) {
+        if(!p.isOpen) p.openPopupCentered
+        waitForPopup(p)
+    }
+
     def doRootLayout {
         val w = root.getWidth
         val h = root.getHeight
         }
     }
 
+    def width = gui.getWidth
+    def height = gui.getHeight
     def contents = root.contents
 
     def ! (body: => Unit) { gui.invokeLater(new Runnable { def run { body }}) }