glimmer-dsl-libui 0.0.1 → 0.0.5

data/lib/glimmer/libui/control_proxy.rb

@@ -21,17 +21,19 @@
 
 module Glimmer
   module LibUI
-    # Proxy for LibUI Control objects
+    # Proxy for LibUI control objects
     #
     # Follows the Proxy Design Pattern
     class ControlProxy
       class << self
         def control_exists?(keyword)
-          ::LibUI.respond_to?("new_#{keyword}") || ::LibUI.respond_to?(keyword)
+          ::LibUI.respond_to?("new_#{keyword}") ||
+            ::LibUI.respond_to?(keyword) ||
+            Glimmer::LibUI.constants.include?("#{keyword.camelcase(:upper)}Proxy".to_sym)
         end
         
-        def create(keyword, parent, args)
-          widget_proxy_class(keyword).new(keyword, parent, args)
+        def create(keyword, parent, args, &block)
+          widget_proxy_class(keyword).new(keyword, parent, args, &block)
         end
         
         def widget_proxy_class(keyword)
@@ -51,65 +53,129 @@ module Glimmer
         @keyword = keyword
         @parent_proxy = parent
         @args = args
+        @block = block
+        @enabled = 1
         build_control
-        if @parent_proxy.is_a?(WindowProxy)
-          ::LibUI.window_set_child(@parent_proxy.libui, @libui)
+        if @parent_proxy.class.constants.include?(:APPEND_PROPERTIES)
+          @parent_proxy.class::APPEND_PROPERTIES
         end
+        post_add_content if @block.nil?
       end
       
+      # Subclasses may override to perform post add_content work (normally must call super)
       def post_add_content
-        # No Op by default
+        @parent_proxy&.post_initialize_child(self)
       end
       
+      # Subclasses may override to perform post initialization work on an added child
+      def post_initialize_child(child)
+        # No Op by default
+      end
+
       def can_handle_listener?(listener_name)
-        ::LibUI.respond_to?("control_#{listener_name}") || ::LibUI.respond_to?("#{@keyword}_#{listener_name}")
+        ::LibUI.respond_to?("control_#{listener_name}") || ::LibUI.respond_to?("#{libui_api_keyword}_#{listener_name}")
       end
       
       def handle_listener(listener_name, &listener)
         if ::LibUI.respond_to?("control_#{listener_name}")
           ::LibUI.send("control_#{listener_name}", @libui, &listener)
-        elsif ::LibUI.respond_to?("#{@keyword}_#{listener_name}")
-          ::LibUI.send("#{@keyword}_#{listener_name}", @libui, &listener)
+        elsif ::LibUI.respond_to?("#{libui_api_keyword}_#{listener_name}")
+          ::LibUI.send("#{libui_api_keyword}_#{listener_name}", @libui, &listener)
         end
       end
       
       def respond_to?(method_name, *args, &block)
-        respond_to_libui?(method_name, *args, &block) || super
+        respond_to_libui?(method_name, *args, &block) ||
+          (append_properties.include?(method_name.to_s) || append_properties.include?(method_name.to_s.sub(/=$/, ''))) ||
+          super
       end
       
       def respond_to_libui?(method_name, *args, &block)
         ::LibUI.respond_to?("control_#{method_name}") ||
-          ::LibUI.respond_to?("#{@keyword}_#{method_name}") ||
-          ::LibUI.respond_to?("#{@keyword}_set_#{method_name}") ||
-          ::LibUI.respond_to?("#{@keyword}_set_#{method_name.to_s.sub(/=$/, '')}")
+          ::LibUI.respond_to?("#{libui_api_keyword}_#{method_name}") ||
+          ::LibUI.respond_to?("#{libui_api_keyword}_set_#{method_name}") ||
+          ::LibUI.respond_to?("#{libui_api_keyword}_set_#{method_name.to_s.sub(/=$/, '')}")
       end
       
       def method_missing(method_name, *args, &block)
         if respond_to_libui?(method_name, *args, &block)
           send_to_libui(method_name, *args, &block)
+        elsif (append_properties.include?(method_name.to_s) || append_properties.include?(method_name.to_s.sub(/=$/, '')))
+          append_property(method_name, *args)
         else
           super
         end
       end
       
       def send_to_libui(method_name, *args, &block)
-        if ::LibUI.respond_to?("control_#{method_name}")
+        if ::LibUI.respond_to?("#{libui_api_keyword}_#{method_name}") && args.empty?
+          ::LibUI.send("#{libui_api_keyword}_#{method_name}", @libui, *args)
+        elsif ::LibUI.respond_to?("#{libui_api_keyword}_set_#{method_name}") && !args.empty?
+          ::LibUI.send("#{libui_api_keyword}_set_#{method_name}", @libui, *args)
+        elsif ::LibUI.respond_to?("#{libui_api_keyword}_set_#{method_name.to_s.sub(/=$/, '')}") && !args.empty?
+          ::LibUI.send("#{libui_api_keyword}_set_#{method_name.to_s.sub(/=$/, '')}", @libui, *args)
+        elsif ::LibUI.respond_to?("#{libui_api_keyword}_#{method_name}") && method_name.start_with?('set_') && !args.empty?
+          ::LibUI.send("#{libui_api_keyword}_#{method_name}", @libui, *args)
+        elsif ::LibUI.respond_to?("#{libui_api_keyword}_#{method_name}") && !args.empty?
+          ::LibUI.send("#{libui_api_keyword}_#{method_name}", @libui, *args)
+        elsif ::LibUI.respond_to?("control_#{method_name}")
           ::LibUI.send("control_#{method_name}", @libui, *args)
-        elsif ::LibUI.respond_to?("#{@keyword}_#{method_name}") && args.empty?
-          ::LibUI.send("#{@keyword}_#{method_name}", @libui, *args)
-        elsif ::LibUI.respond_to?("#{@keyword}_set_#{method_name}") && !args.empty?
-          ::LibUI.send("#{@keyword}_set_#{method_name}", @libui, *args)
-        elsif ::LibUI.respond_to?("#{@keyword}_set_#{method_name.to_s.sub(/=$/, '')}") && !args.empty?
-          ::LibUI.send("#{@keyword}_set_#{method_name.to_s.sub(/=$/, '')}", @libui, *args)
-        elsif ::LibUI.respond_to?("#{@keyword}_#{method_name}") && method_name.start_with?('set_') && !args.empty?
-          ::LibUI.send("#{@keyword}_#{method_name}", @libui, *args)
         end
       end
       
+      def append_properties
+        @parent_proxy&.class&.constants&.include?(:APPEND_PROPERTIES) ? @parent_proxy.class::APPEND_PROPERTIES : []
+      end
+      
+      def append_property(property, value = nil)
+        property = property.to_s.sub(/=$/, '')
+        @append_property_hash ||= {}
+        if value.nil?
+          @append_property_hash[property]
+        else
+          @append_property_hash[property] = value
+        end
+      end
+      
+      def libui_api_keyword
+        @keyword
+      end
+      
+      def enabled(value = nil)
+        if value.nil?
+          @enabled
+        elsif value != @enabled
+          if value == 1
+            send_to_libui('enable')
+          else
+            send_to_libui('disable')
+          end
+        end
+      end
+      alias enabled? enabled
+      alias set_enabled enabled
+      alias enabled= enabled
+      
+      def visible(value = nil)
+        current_value = send_to_libui('visible')
+        if value.nil?
+          current_value
+        elsif value != current_value
+          if value == 1
+            send_to_libui('show')
+          else
+            send_to_libui('hide')
+          end
+        end
+      end
+      alias visible? visible
+      alias set_visible visible
+      alias visible= visible
+      
       private
       
       def build_control
-        @libui ||= if ::LibUI.respond_to?("new_#{keyword}")
+        @libui = if ::LibUI.respond_to?("new_#{keyword}")
           ::LibUI.send("new_#{@keyword}", *@args)
         elsif ::LibUI.respond_to?(keyword)
           @args[0] = @args.first.libui if @args.first.is_a?(ControlProxy)

data/lib/glimmer/libui/editable_combobox_proxy.rb

@@ -0,0 +1,42 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI editable combobox objects
+    #
+    # Follows the Proxy Design Pattern
+    class EditableComboboxProxy < ControlProxy
+      def items(values = nil)
+        if values.nil?
+          @values
+        else
+          @values = values
+          @values.each { |value| append value }
+        end
+      end
+      alias set_items items
+      alias items= items
+    end
+  end
+end

data/lib/glimmer/libui/group_proxy.rb

@@ -0,0 +1,35 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI group objects
+    #
+    # Follows the Proxy Design Pattern
+    class GroupProxy < ControlProxy
+      def post_initialize_child(child)
+        ::LibUI.group_set_child(@libui, child.libui)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/horizontal_box_proxy.rb

@@ -0,0 +1,34 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/control_proxy'
+require 'glimmer/libui/box'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI horizontal box objects
+    #
+    # Follows the Proxy Design Pattern
+    class HorizontalBoxProxy < ControlProxy
+      include Box
+    end
+  end
+end

data/lib/glimmer/libui/menu_item_proxy.rb

@@ -0,0 +1,41 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI menu item objects
+    #
+    # Follows the Proxy Design Pattern
+    class MenuItemProxy < ControlProxy
+      def libui_api_keyword
+        'menu_item'
+      end
+    
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_item(*@args)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/preferences_menu_item_proxy.rb

@@ -0,0 +1,37 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/menu_item_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI preferences menu item object
+    #
+    # Follows the Proxy Design Pattern
+    class PreferencesMenuItemProxy < MenuItemProxy
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_preferences_item(*@args)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/quit_menu_item_proxy.rb

@@ -0,0 +1,62 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/menu_item_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI quit menu item object
+    #
+    # Follows the Proxy Design Pattern
+    class QuitMenuItemProxy < MenuItemProxy
+      def can_handle_listener?(listener_name)
+        listener_name == 'on_clicked' || super
+      end
+    
+      def handle_listener(listener_name, &listener)
+        if listener_name == 'on_clicked'
+          default_behavior_listener = Proc.new do
+            return_value = listener.call
+            if return_value.is_a?(Numeric)
+              return_value
+            else
+              destroy
+              ::LibUI.quit
+              0
+            end
+          end
+        end
+        ::LibUI.on_should_quit(&default_behavior_listener)
+      end
+    
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_quit_item(*@args)
+        handle_listener('on_clicked') do
+          destroy
+          ::LibUI.quit
+          0
+        end
+      end
+    end
+  end
+end

data/lib/glimmer/libui/radio_buttons_proxy.rb

@@ -0,0 +1,42 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI radio buttons objects
+    #
+    # Follows the Proxy Design Pattern
+    class RadioButtonsProxy < ControlProxy
+      def items(values = nil)
+        if values.nil?
+          @values
+        else
+          @values = values
+          @values.each { |value| append value }
+        end
+      end
+      alias set_items items
+      alias items= items
+    end
+  end
+end

data/lib/glimmer/libui/separator_menu_item_proxy.rb

@@ -0,0 +1,37 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/menu_item_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI separator menu item object
+    #
+    # Follows the Proxy Design Pattern
+    class SeparatorMenuItemProxy < MenuItemProxy
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_separator(*@args)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/tab_item_proxy.rb

@@ -0,0 +1,64 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/control_proxy'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI tab item objects
+    #
+    # Follows the Proxy Design Pattern
+    class TabItemProxy < ControlProxy
+      attr_reader :index
+      
+      def initialize(keyword, parent, args, &block)
+        @keyword = keyword
+        @parent_proxy = parent
+        @args = args
+        @block = block
+        @enabled = 1
+        @index = @parent_proxy.num_pages
+        @content = @block.call
+        build_control
+      end
+      
+      def name
+        @args.first
+      end
+      
+      def margined(value = nil)
+        if value.nil?
+          @parent_proxy.margined(@index)
+        else
+          @parent_proxy.margined(@index, value)
+        end
+      end
+      alias set_margined margined
+      alias margined= margined
+          
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append(name, @content.libui)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/vertical_box_proxy.rb

@@ -0,0 +1,34 @@
+# Copyright (c) 2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer/libui/control_proxy'
+require 'glimmer/libui/box'
+
+module Glimmer
+  module LibUI
+    # Proxy for LibUI vertical box objects
+    #
+    # Follows the Proxy Design Pattern
+    class VerticalBoxProxy < ControlProxy
+      include Box
+    end
+  end
+end

data/lib/glimmer/libui/window_proxy.rb

@@ -23,15 +23,20 @@ require 'glimmer/libui/control_proxy'
 
 module Glimmer
   module LibUI
-    # Proxy for LibUI Window objects
+    # Proxy for LibUI window objects
     #
     # Follows the Proxy Design Pattern
     class WindowProxy < ControlProxy
+      def post_initialize_child(child)
+        ::LibUI.window_set_child(@libui, child.libui)
+      end
+    
       def show
         send_to_libui('show')
         unless @shown_at_least_once
           @shown_at_least_once = true
           ::LibUI.main
+          ::LibUI.quit
         end
       end
       
@@ -54,7 +59,6 @@ module Glimmer
       private
       
       def build_control
-        ::LibUI.init
         super.tap do
           handle_listener('on_closing') do
             destroy

data/lib/glimmer-dsl-libui.rb

@@ -38,3 +38,5 @@ Glimmer::Config.excluded_keyword_checkers << lambda do |method_symbol, *args|
   result = false
   result ||= method == 'load_iseq'
 end
+
+::LibUI.init