glimmer-dsl-libui 0.0.4 → 0.0.5

data/examples/control_gallery.rb

@@ -0,0 +1,184 @@
+# frozen_string_literal: true
+
+require 'glimmer-dsl-libui'
+
+include Glimmer
+
+menu('File') {
+  menu_item('Open') {
+    on_clicked do
+      file = open_file(MAIN_WINDOW)
+      puts file unless file.nil?
+    end
+  }
+
+  menu_item('Save') {
+    on_clicked do
+      file = save_file(MAIN_WINDOW)
+      puts file unless file.nil?
+    end
+  }
+  
+  quit_menu_item {
+    on_clicked do
+      puts 'Bye Bye'
+    end
+  }
+  
+  preferences_menu_item # Can optionally contain an on_clicked listener
+}
+
+menu('Edit') {
+  check_menu_item('Checkable Item_')
+  separator_menu_item
+  menu_item('Disabled Item_') { |mi|
+    enabled 0
+  }
+}
+
+menu('Help') {
+  menu_item('Help')
+  
+  about_menu_item # Can optionally contain an on_clicked listener
+}
+
+MAIN_WINDOW = window('Control Gallery', 600, 500, 1) {
+  margined 1
+  
+  on_closing do
+    puts 'Bye Bye'
+  end
+  
+  vertical_box { |vb|
+    padded 1
+
+    horizontal_box {
+      padded 1
+
+      group('Basic Controls') {
+        margined 1
+
+        vertical_box {
+          padded 1
+
+          button('Button') {
+            stretchy 0
+
+            on_clicked do
+              msg_box(MAIN_WINDOW, 'Information', 'You clicked the button')
+            end
+          }
+
+          checkbox('Checkbox') { |c|
+            stretchy 0
+
+            on_toggled do
+              checked = c.checked == 1
+              MAIN_WINDOW.title = "Checkbox is #{checked}"
+              c.text = "I am the checkbox (#{checked})"
+            end
+          }
+
+          label('Label') { stretchy 0 }
+
+          horizontal_separator { stretchy 0 }
+
+          date_picker { stretchy 0 }
+
+          time_picker { stretchy 0 }
+
+          date_time_picker { stretchy 0 }
+
+          font_button { stretchy 0 }
+
+          color_button { stretchy 0 }
+        }
+      }
+
+      vertical_box {
+        padded 1
+
+        group('Numbers') {
+          stretchy 0
+          margined 1
+
+          vertical_box {
+            padded 1
+
+            spinbox(0, 100) { |s|
+              stretchy 0
+              value 42
+
+              on_changed do
+                puts "New Spinbox value: #{s.value}"
+              end
+            }
+
+            slider(0, 100) { |s|
+              stretchy 0
+
+              on_changed do
+                v = s.value
+                puts "New Slider value: #{v}"
+                @progress_bar.value = v
+              end
+            }
+
+            @progress_bar = progress_bar { stretchy 0 }
+          }
+        }
+
+        group('Lists') {
+          stretchy 0
+          margined 1
+
+          vertical_box {
+            padded 1
+
+            combobox { |c|
+              stretchy 0
+              items ['combobox Item 1', 'combobox Item 2', 'combobox Item 3']
+
+              on_selected do
+                puts "New combobox selection: #{c.selected}"
+              end
+            }
+
+            editable_combobox {
+              stretchy 0
+              items ['Editable Item 1', 'Editable Item 2', 'Editable Item 3']
+            }
+
+            radio_buttons {
+              items ['Radio Button 1', 'Radio Button 2', 'Radio Button 3']
+            }
+          }
+        }
+
+        tab {
+          tab_item('Page 1') {
+            horizontal_box {
+              entry { |e|
+                text 'Please enter your feelings'
+
+                on_changed do
+                  puts "Current textbox data: '#{e.text}'"
+                end
+              }
+            }
+          }
+
+          tab_item('Page 2') {
+            horizontal_box
+          }
+
+          tab_item('Page 3') {
+            horizontal_box
+          }
+        }
+      }
+    }
+  }
+}
+
+MAIN_WINDOW.show

data/lib/glimmer/dsl/libui/dsl.rb

@@ -20,7 +20,7 @@
 # WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 
 require 'glimmer/dsl/engine'
-Dir[File.expand_path('../*_expression.rb', __FILE__)].each {|f| require f}
+Dir[File.expand_path('*_expression.rb', __dir__)].each {|f| require f}
 
 # Glimmer DSL expression configuration module
 #

data/lib/glimmer/dsl/libui/file_expression.rb

@@ -0,0 +1,33 @@
+# 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.
+
+module Glimmer
+  module DSL
+    module Libui
+      module FileExpression
+        def interpret(parent, keyword, *args, &block)
+          file_pointer = ::LibUI.send(self.class.name.underscore.split('::').last.sub(/_expression$/, ''), args.first.libui)
+          file_pointer.to_s unless file_pointer.null?
+        end
+      end
+    end
+  end
+end

data/lib/glimmer/dsl/libui/open_file_expression.rb

@@ -0,0 +1,33 @@
+# 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/dsl/static_expression'
+require 'glimmer/dsl/libui/file_expression'
+
+module Glimmer
+  module DSL
+    module Libui
+      class OpenFileExpression < StaticExpression
+        include FileExpression
+      end
+    end
+  end
+end

data/lib/glimmer/dsl/libui/save_file_expression.rb

@@ -0,0 +1,33 @@
+# 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/dsl/static_expression'
+require 'glimmer/dsl/libui/file_expression'
+
+module Glimmer
+  module DSL
+    module Libui
+      class SaveFileExpression < StaticExpression
+        include FileExpression
+      end
+    end
+  end
+end

data/lib/glimmer/dsl/libui/tab_item_expression.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/dsl/static_expression'
+require 'glimmer/libui/tab_item_proxy'
+
+module Glimmer
+  module DSL
+    module Libui
+      class TabItemExpression < StaticExpression
+        def interpret(parent, keyword, *args, &block)
+          Glimmer::LibUI::TabItemProxy.new(keyword, parent, args, &block)
+        end
+      end
+    end
+  end
+end

data/lib/glimmer/libui/about_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 about menu item object
+    #
+    # Follows the Proxy Design Pattern
+    class AboutMenuItemProxy < MenuItemProxy
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_about_item(*@args)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/box.rb

@@ -28,6 +28,10 @@ module Glimmer
         child.stretchy = 1 if child.stretchy.nil?
         ::LibUI.box_append(@libui, child.libui, child.stretchy)
       end
+      
+      def libui_api_keyword
+        'box'
+      end
     end
   end
 end

data/lib/glimmer/libui/check_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 check menu item object
+    #
+    # Follows the Proxy Design Pattern
+    class CheckMenuItemProxy < MenuItemProxy
+      private
+      
+      def build_control
+        @libui = @parent_proxy.append_check_item(*@args)
+      end
+    end
+  end
+end

data/lib/glimmer/libui/combobox_proxy.rb

@@ -23,7 +23,7 @@ require 'glimmer/libui/control_proxy'
 
 module Glimmer
   module LibUI
-    # Proxy for LibUI window objects
+    # Proxy for LibUI combobox objects
     #
     # Follows the Proxy Design Pattern
     class ComboboxProxy < ControlProxy

data/lib/glimmer/libui/control_proxy.rb

@@ -54,6 +54,7 @@ module Glimmer
         @parent_proxy = parent
         @args = args
         @block = block
+        @enabled = 1
         build_control
         if @parent_proxy.class.constants.include?(:APPEND_PROPERTIES)
           @parent_proxy.class::APPEND_PROPERTIES
@@ -72,14 +73,14 @@ module Glimmer
       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
       
@@ -91,9 +92,9 @@ module Glimmer
       
       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)
@@ -107,18 +108,18 @@ module Glimmer
       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)
-        elsif ::LibUI.respond_to?("#{@keyword}_#{method_name}") && !args.empty?
-          ::LibUI.send("#{@keyword}_#{method_name}", @libui, *args)
         end
       end
       
@@ -136,10 +137,45 @@ module Glimmer
         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/menu_item_proxy.rb

@@ -27,11 +27,14 @@ module Glimmer
     #
     # Follows the Proxy Design Pattern
     class MenuItemProxy < ControlProxy
+      def libui_api_keyword
+        'menu_item'
+      end
     
       private
       
       def build_control
-        @libui ||= @parent_proxy.append_item('Version')
+        @libui = @parent_proxy.append_item(*@args)
       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