glimmer-dsl-swt 4.18.4.5 → 4.18.4.6

data/lib/glimmer/swt/color_proxy.rb

@@ -1,107 +1,107 @@
-# Copyright (c) 2007-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/swt/swt_proxy'
-require 'glimmer/swt/display_proxy'
-
-module Glimmer
-  module SWT
-    # Proxy for org.eclipse.swt.graphics.Color
-    #
-    # Invoking `#swt_color` returns the SWT Color object wrapped by this proxy
-    #
-    # Follows the Proxy Design Pattern and Flyweight Design Pattern (caching memoization)
-    class ColorProxy
-      include_package 'org.eclipse.swt.graphics'
-      
-      class << self
-        def flyweight(*args)
-          flyweight_color_proxies[args] ||= new(*args)
-        end
-        
-        # Flyweight Design Pattern memoization cache. Can be cleared if memory is needed.
-        def flyweight_color_proxies
-          @flyweight_color_proxies ||= {}
-        end
-      end
-
-      # Initializes a proxy for an SWT Color object
-      #
-      # Takes a standard color single argument, rgba 3 args, or rgba 4 args
-      #
-      # A standard color is a string/symbol representing one of the
-      # SWT.COLOR_*** constants like SWT.COLOR_RED, but in underscored string
-      # format (e.g :color_red).
-      # Glimmer can also accept standard color names without the color_ prefix,
-      # and it will automatically figure out the SWT.COLOR_*** constant
-      # (e.g. :red)
-      #
-      # rgb is 3 arguments representing Red, Green, Blue numeric values
-      #
-      # rgba is 4 arguments representing Red, Green, Blue, and Alpha numeric values
-      #
-      def initialize(*args)
-        @args = args
-        ensure_arg_values_within_valid_bounds
-      end
-
-      def swt_color
-        unless @swt_color
-          case @args.size
-          when 1
-            if @args.first.is_a?(String) || @args.first.is_a?(Symbol)
-              standard_color = @args.first
-              standard_color = "color_#{standard_color}".to_sym unless standard_color.to_s.downcase.include?('color_')
-              @swt_color = DisplayProxy.instance.swt_display.getSystemColor(SWTProxy[standard_color])
-            else
-              @swt_color = @args.first
-            end
-          when 3..4
-            red, green, blue, alpha = @args
-            @swt_color = Color.new(*[red, green, blue, alpha].compact)
-          end
-        end
-        @swt_color
-      end
-      
-      def method_missing(method, *args, &block)
-        swt_color.send(method, *args, &block)
-      rescue => e
-        Glimmer::Config.logger.debug {"Neither ColorProxy nor #{swt_color.class.name} can handle the method ##{method}"}
-        super
-      end
-      
-      def respond_to?(method, *args, &block)
-        super || swt_color.respond_to?(method, *args, &block)
-      end
-      
-      private
-      
-      def ensure_arg_values_within_valid_bounds
-        if @args.to_a.size >= 3
-          @args = @args.map do |value|
-            [[value, 255].min, 0].max
-          end
-        end
-      end
-    end
-  end
-end
+# Copyright (c) 2007-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/swt/swt_proxy'
+require 'glimmer/swt/display_proxy'
+
+module Glimmer
+  module SWT
+    # Proxy for org.eclipse.swt.graphics.Color
+    #
+    # Invoking `#swt_color` returns the SWT Color object wrapped by this proxy
+    #
+    # Follows the Proxy Design Pattern and Flyweight Design Pattern (caching memoization)
+    class ColorProxy
+      include_package 'org.eclipse.swt.graphics'
+      
+      class << self
+        def flyweight(*args)
+          flyweight_color_proxies[args] ||= new(*args)
+        end
+        
+        # Flyweight Design Pattern memoization cache. Can be cleared if memory is needed.
+        def flyweight_color_proxies
+          @flyweight_color_proxies ||= {}
+        end
+      end
+
+      # Initializes a proxy for an SWT Color object
+      #
+      # Takes a standard color single argument, rgba 3 args, or rgba 4 args
+      #
+      # A standard color is a string/symbol representing one of the
+      # SWT.COLOR_*** constants like SWT.COLOR_RED, but in underscored string
+      # format (e.g :color_red).
+      # Glimmer can also accept standard color names without the color_ prefix,
+      # and it will automatically figure out the SWT.COLOR_*** constant
+      # (e.g. :red)
+      #
+      # rgb is 3 arguments representing Red, Green, Blue numeric values
+      #
+      # rgba is 4 arguments representing Red, Green, Blue, and Alpha numeric values
+      #
+      def initialize(*args)
+        @args = args
+        ensure_arg_values_within_valid_bounds
+      end
+
+      def swt_color
+        unless @swt_color
+          case @args.size
+          when 1
+            if @args.first.is_a?(String) || @args.first.is_a?(Symbol)
+              standard_color = @args.first
+              standard_color = "color_#{standard_color}".to_sym unless standard_color.to_s.downcase.include?('color_')
+              @swt_color = DisplayProxy.instance.swt_display.getSystemColor(SWTProxy[standard_color])
+            else
+              @swt_color = @args.first
+            end
+          when 3..4
+            red, green, blue, alpha = @args
+            @swt_color = Color.new(*[red, green, blue, alpha].compact)
+          end
+        end
+        @swt_color
+      end
+      
+      def method_missing(method, *args, &block)
+        swt_color.send(method, *args, &block)
+      rescue => e
+        Glimmer::Config.logger.debug {"Neither ColorProxy nor #{swt_color.class.name} can handle the method ##{method}"}
+        super
+      end
+      
+      def respond_to?(method, *args, &block)
+        super || swt_color.respond_to?(method, *args, &block)
+      end
+      
+      private
+      
+      def ensure_arg_values_within_valid_bounds
+        if @args.to_a.size >= 3
+          @args = @args.map do |value|
+            [[value, 255].min, 0].max
+          end
+        end
+      end
+    end
+  end
+end

data/lib/glimmer/swt/cursor_proxy.rb

@@ -1,66 +1,66 @@
-# Copyright (c) 2007-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/error'
-require 'glimmer/swt/swt_proxy'
-require 'glimmer/swt/display_proxy'
-
-module Glimmer
-  module SWT
-    # Proxy for org.eclipse.swt.graphics.Cursor
-    #
-    # Invoking `#swt_cursor` returns the SWT Cursor object wrapped by this proxy
-    #
-    # Follows the Proxy Design Pattern
-    class CursorProxy
-      CURSOR_STYLES = org.eclipse.swt.SWT.constants.select {|c| c.to_s.downcase.start_with?('cursor_')}.map {|c| c.to_s.downcase.sub('cursor_', '').to_sym}
-      ERROR_INVALID_CURSOR_STYLE = " is an invalid cursor style! Valid values are #{CURSOR_STYLES.map(&:to_s).join(", ")}"
-
-      include_package 'org.eclipse.swt.graphics'
-
-      attr_reader :swt_cursor, :cursor_style
-
-      # Builds a new CursorProxy from passed in cursor SWT style (e.g. :appstarting, :hand, or :help)
-      #
-      # Cursor SWT styles are those that begin with "CURSOR_" prefix
-      #
-      # They are expected to be passed in in short form without the prefix (but would work with the prefix too)
-      def initialize(cursor_style)
-        @cursor_style = cursor_style
-        @cursor_style = SWTProxy.reverse_lookup(@cursor_style).detect { |symbol| symbol.to_s.downcase.start_with?('cursor_') } if cursor_style.is_a?(Integer)
-        @cursor_style = @cursor_style.to_s.downcase
-        @cursor_style = @cursor_style.sub(/^cursor\_/, '') if @cursor_style.start_with?('cursor_')
-        detect_invalid_cursor_style
-        @swt_cursor = DisplayProxy.instance.swt_display.get_system_cursor(SWTProxy[swt_style])
-      end
-      
-      def swt_style
-        @swt_style ||= @cursor_style.upcase.start_with?('CURSOR_') ? @cursor_style : "CURSOR_#{@cursor_style}"
-      end
-
-      private
-
-      def detect_invalid_cursor_style
-        raise Error, cursor_style.to_s + ERROR_INVALID_CURSOR_STYLE unless CURSOR_STYLES.include?(cursor_style.to_s.downcase.to_sym)
-      end
-    end
-  end
-end
+# Copyright (c) 2007-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/error'
+require 'glimmer/swt/swt_proxy'
+require 'glimmer/swt/display_proxy'
+
+module Glimmer
+  module SWT
+    # Proxy for org.eclipse.swt.graphics.Cursor
+    #
+    # Invoking `#swt_cursor` returns the SWT Cursor object wrapped by this proxy
+    #
+    # Follows the Proxy Design Pattern
+    class CursorProxy
+      CURSOR_STYLES = org.eclipse.swt.SWT.constants.select {|c| c.to_s.downcase.start_with?('cursor_')}.map {|c| c.to_s.downcase.sub('cursor_', '').to_sym}
+      ERROR_INVALID_CURSOR_STYLE = " is an invalid cursor style! Valid values are #{CURSOR_STYLES.map(&:to_s).join(", ")}"
+
+      include_package 'org.eclipse.swt.graphics'
+
+      attr_reader :swt_cursor, :cursor_style
+
+      # Builds a new CursorProxy from passed in cursor SWT style (e.g. :appstarting, :hand, or :help)
+      #
+      # Cursor SWT styles are those that begin with "CURSOR_" prefix
+      #
+      # They are expected to be passed in in short form without the prefix (but would work with the prefix too)
+      def initialize(cursor_style)
+        @cursor_style = cursor_style
+        @cursor_style = SWTProxy.reverse_lookup(@cursor_style).detect { |symbol| symbol.to_s.downcase.start_with?('cursor_') } if cursor_style.is_a?(Integer)
+        @cursor_style = @cursor_style.to_s.downcase
+        @cursor_style = @cursor_style.sub(/^cursor\_/, '') if @cursor_style.start_with?('cursor_')
+        detect_invalid_cursor_style
+        @swt_cursor = DisplayProxy.instance.swt_display.get_system_cursor(SWTProxy[swt_style])
+      end
+      
+      def swt_style
+        @swt_style ||= @cursor_style.upcase.start_with?('CURSOR_') ? @cursor_style : "CURSOR_#{@cursor_style}"
+      end
+
+      private
+
+      def detect_invalid_cursor_style
+        raise Error, cursor_style.to_s + ERROR_INVALID_CURSOR_STYLE unless CURSOR_STYLES.include?(cursor_style.to_s.downcase.to_sym)
+      end
+    end
+  end
+end

data/lib/glimmer/swt/custom/animation.rb

@@ -215,11 +215,8 @@ module Glimmer
           self.class.schedule_frame_animation(self) do
             if started? && start_number == @start_number && within_duration_limit?
               unless @parent.isDisposed
-                @parent.clear_shapes
-                @parent.content {
-                  frame_block.call(*block_args)
-                }
-                @parent.redraw
+                @parent.clear_shapes # TODO adjust this to clear only the shapes of this animation (not all shapes) to allow simultaneous animations to occur on the same parent
+                @parent.content { frame_block.call(*block_args) }
               end
             else
               if stopped? && @frame_index > current_frame_index

data/lib/glimmer/swt/custom/checkbox_group.rb

@@ -1,181 +1,181 @@
-# Copyright (c) 2007-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/ui/custom_widget'
-
-module Glimmer
-  module SWT
-    module Custom
-      # A custom widget rendering a group of checkboxes generated via data-binding
-      class CheckboxGroup
-        include Glimmer::UI::CustomWidget
-        
-        body {
-          composite # just an empty composite to hold checkboxs upon data-binding `selection`
-        }
-        
-        def items=(text_array)
-          selection_value = selection
-          @items = Array[*text_array]
-          build_checkboxes
-        end
-        
-        def items
-          @items || []
-        end
-        
-        def selection=(selection_texts)
-          items.count.times do |index|
-            checkbox = checkboxes[index]
-            item = items[index]
-            label_text = labels[index]&.text
-            checkbox.selection = selection_texts.to_a.include?(label_text)
-          end
-          selection_texts
-        end
-        
-        def selection
-          selection_indices.map do |selection_index|
-            labels[selection_index]&.text
-          end
-        end
-        
-        def selection_indices=(indices)
-          self.selection=(indices.to_a.map {|index| items[index]})
-        end
-        alias select selection_indices=
-        
-        def selection_indices
-          checkboxes.each_with_index.map do |checkbox, index|
-            index if checkbox.selection
-          end.to_a.compact
-        end
-        
-        def checkboxes
-          @checkboxes ||= []
-        end
-        alias checks checkboxes
-        
-        def labels
-          @labels ||= []
-        end
-        
-        def can_handle_observation_request?(observation_request)
-          checkboxes.first&.can_handle_observation_request?(observation_request) || super(observation_request)
-        end
-        
-        def handle_observation_request(observation_request, &block)
-          observation_requests << [observation_request, block]
-          delegate_observation_request_to_checkboxes(observation_request, &block)
-          super
-        end
-        
-        def delegate_observation_request_to_checkboxes(observation_request, &block)
-          if observation_request != 'on_widget_disposed'
-            checkboxes.count.times do |index|
-              checkbox = checkboxes[index]
-              label = labels[index]
-              listener_block = lambda do |event|
-                event.widget = self.swt_widget
-                block.call(event)
-              end
-              if observation_request == 'on_widget_selected'
-                checkbox.handle_observation_request(observation_request, &listener_block) if checkbox.can_handle_observation_request?(observation_request)
-                label.handle_observation_request('on_mouse_up', &listener_block)
-              else
-                checkbox.handle_observation_request(observation_request, &listener_block) if checkbox.can_handle_observation_request?(observation_request)
-                label.handle_observation_request(observation_request, &listener_block) if label.can_handle_observation_request?(observation_request)
-              end
-            end
-          end
-        end
-        
-        def observation_requests
-          @observation_requests ||= Set.new
-        end
-        
-        def has_attribute?(attribute_name, *args)
-          (@composites.to_a + @checkboxes.to_a + @labels.to_a).map do |widget_proxy|
-            return true if widget_proxy.has_attribute?(attribute_name, *args)
-          end
-          super
-        end
-         
-        def set_attribute(attribute_name, *args)
-          excluded_attributes = ['selection']
-          unless excluded_attributes.include?(attribute_name.to_s)
-            (@composites.to_a + @checkboxes.to_a + @labels.to_a).each do |widget_proxy|
-              widget_proxy.set_attribute(attribute_name, *args) if widget_proxy.has_attribute?(attribute_name, *args)
-            end
-          end
-          super
-        end
-        
-        private
-        
-        def build_checkboxes
-          current_selection = selection
-          @composites.to_a.each(&:dispose)
-          @checkboxes = []
-          @labels = []
-          @composites = []
-          items.each do |item|
-            body_root.content {
-              @composites << composite {
-                grid_layout(2, false) {
-                  margin_width 0
-                  margin_height 0
-                  horizontal_spacing 0
-                  vertical_spacing 0
-                }
-                checkboxes << checkbox { |checkbox_proxy|
-                  on_widget_selected {
-                    self.selection_indices = checkboxes.each_with_index.map {|cb, i| i if cb.selection}.to_a.compact
-                  }
-                }
-                labels << label { |label_proxy|
-                  layout_data :fill, :center, true, false
-                  text item
-                  on_mouse_up { |event|
-                    found_text = labels.each_with_index.detect {|l, i| event.widget == l.swt_widget}[0]&.text
-                    selection_values = self.selection
-                    if selection_values.include?(found_text)
-                      selection_values.delete(found_text)
-                    else
-                      selection_values << found_text
-                    end
-                    self.selection = selection_values
-                  }
-                }
-              }
-            }
-          end
-          observation_requests.to_a.each do |observation_request, block|
-            delegate_observation_request_to_checkboxes(observation_request, &block)
-          end
-          self.selection = current_selection
-        end
-      end
-      
-      CheckGroup = CheckboxGroup
-    end
-  end
-end
+# Copyright (c) 2007-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/ui/custom_widget'
+
+module Glimmer
+  module SWT
+    module Custom
+      # A custom widget rendering a group of checkboxes generated via data-binding
+      class CheckboxGroup
+        include Glimmer::UI::CustomWidget
+        
+        body {
+          composite # just an empty composite to hold checkboxs upon data-binding `selection`
+        }
+        
+        def items=(text_array)
+          selection_value = selection
+          @items = Array[*text_array]
+          build_checkboxes
+        end
+        
+        def items
+          @items || []
+        end
+        
+        def selection=(selection_texts)
+          items.count.times do |index|
+            checkbox = checkboxes[index]
+            item = items[index]
+            label_text = labels[index]&.text
+            checkbox.selection = selection_texts.to_a.include?(label_text)
+          end
+          selection_texts
+        end
+        
+        def selection
+          selection_indices.map do |selection_index|
+            labels[selection_index]&.text
+          end
+        end
+        
+        def selection_indices=(indices)
+          self.selection=(indices.to_a.map {|index| items[index]})
+        end
+        alias select selection_indices=
+        
+        def selection_indices
+          checkboxes.each_with_index.map do |checkbox, index|
+            index if checkbox.selection
+          end.to_a.compact
+        end
+        
+        def checkboxes
+          @checkboxes ||= []
+        end
+        alias checks checkboxes
+        
+        def labels
+          @labels ||= []
+        end
+        
+        def can_handle_observation_request?(observation_request)
+          checkboxes.first&.can_handle_observation_request?(observation_request) || super(observation_request)
+        end
+        
+        def handle_observation_request(observation_request, &block)
+          observation_requests << [observation_request, block]
+          delegate_observation_request_to_checkboxes(observation_request, &block)
+          super
+        end
+        
+        def delegate_observation_request_to_checkboxes(observation_request, &block)
+          if observation_request != 'on_widget_disposed'
+            checkboxes.count.times do |index|
+              checkbox = checkboxes[index]
+              label = labels[index]
+              listener_block = lambda do |event|
+                event.widget = self.swt_widget
+                block.call(event)
+              end
+              if observation_request == 'on_widget_selected'
+                checkbox.handle_observation_request(observation_request, &listener_block) if checkbox.can_handle_observation_request?(observation_request)
+                label.handle_observation_request('on_mouse_up', &listener_block)
+              else
+                checkbox.handle_observation_request(observation_request, &listener_block) if checkbox.can_handle_observation_request?(observation_request)
+                label.handle_observation_request(observation_request, &listener_block) if label.can_handle_observation_request?(observation_request)
+              end
+            end
+          end
+        end
+        
+        def observation_requests
+          @observation_requests ||= Set.new
+        end
+        
+        def has_attribute?(attribute_name, *args)
+          (@composites.to_a + @checkboxes.to_a + @labels.to_a).map do |widget_proxy|
+            return true if widget_proxy.has_attribute?(attribute_name, *args)
+          end
+          super
+        end
+         
+        def set_attribute(attribute_name, *args)
+          excluded_attributes = ['selection']
+          unless excluded_attributes.include?(attribute_name.to_s)
+            (@composites.to_a + @checkboxes.to_a + @labels.to_a).each do |widget_proxy|
+              widget_proxy.set_attribute(attribute_name, *args) if widget_proxy.has_attribute?(attribute_name, *args)
+            end
+          end
+          super
+        end
+        
+        private
+        
+        def build_checkboxes
+          current_selection = selection
+          @composites.to_a.each(&:dispose)
+          @checkboxes = []
+          @labels = []
+          @composites = []
+          items.each do |item|
+            body_root.content {
+              @composites << composite {
+                grid_layout(2, false) {
+                  margin_width 0
+                  margin_height 0
+                  horizontal_spacing 0
+                  vertical_spacing 0
+                }
+                checkboxes << checkbox { |checkbox_proxy|
+                  on_widget_selected {
+                    self.selection_indices = checkboxes.each_with_index.map {|cb, i| i if cb.selection}.to_a.compact
+                  }
+                }
+                labels << label { |label_proxy|
+                  layout_data :fill, :center, true, false
+                  text item
+                  on_mouse_up { |event|
+                    found_text = labels.each_with_index.detect {|l, i| event.widget == l.swt_widget}[0]&.text
+                    selection_values = self.selection
+                    if selection_values.include?(found_text)
+                      selection_values.delete(found_text)
+                    else
+                      selection_values << found_text
+                    end
+                    self.selection = selection_values
+                  }
+                }
+              }
+            }
+          end
+          observation_requests.to_a.each do |observation_request, block|
+            delegate_observation_request_to_checkboxes(observation_request, &block)
+          end
+          self.selection = current_selection
+        end
+      end
+      
+      CheckGroup = CheckboxGroup
+    end
+  end
+end