tweaks to BackgroundColorable, GridOrganized, and SliderSpinner

Author: rjackey

widgets/+wt/+mixin/BackgroundColorable.m

@@ -2,18 +2,7 @@
     % Mixin for component with colorable background
     %
 
-    % Copyright 2020-2021 The MathWorks Inc.
-    
-    
-    %% Properties
-    properties (AbortSet, Abstract, ...
-            Access = {?matlab.ui.componentcontainer.ComponentContainer})
-
-        %BackgroundColor (1,3) double {wt.validators.mustBeBetweenZeroAndOne}
-        
-        
-    end %properties
-    
+    % Copyright 2020-2022 The MathWorks Inc.
 
 
     %% Internal properties
@@ -23,51 +12,47 @@
         % List of graphics controls to apply to
         BackgroundColorableComponents (:,1) matlab.graphics.Graphics
 
+        BackgroundColorListener event.proplistener
+
     end %properties
 
-    
-    
-    %% Accessors
-    methods
-        
-%         function set.BackgroundColor(obj,value)
-%             obj.BackgroundColor = value;
-%             obj.updateBackgroundColorableComponents()
-%         end
-        
-        function set.BackgroundColorableComponents(obj,value)
-            obj.BackgroundColorableComponents = value;
-            obj.updateBackgroundColorableComponents()
-        end
-        
-    end %methods
-    
-    
+  
 
     %% Methods
     methods (Access = protected)
 
         function updateBackgroundColorableComponents(obj)
 
-            
             hasProp = isprop(obj.BackgroundColorableComponents,'BackgroundColor');
             wt.utility.fastSet(obj.BackgroundColorableComponents(hasProp),...
-                "BackgroundColor",obj.BackgroundColor);
+                "BackgroundColor",obj.BackgroundColor); %#ok<MCNPN> 
 
         end %function
 
 
         function listenForBackgroundChange(obj)
 
             % Establish Listener for Background Color Change
-            addlistener(obj,'BackgroundColor','PostSet',...
-                @(h,e)obj.updateBackgroundColorableComponents());
+            if isempty(obj.BackgroundColorListener)
+                obj.BackgroundColorListener = ...
+                    addlistener(obj,'BackgroundColor','PostSet',...
+                    @(h,e)obj.updateBackgroundColorableComponents());
+            end
 
-        end
+        end %function
+
+    end %methods
+    
 
-        
 
+    %% Accessors
+    methods
 
+        function set.BackgroundColorableComponents(obj,value)
+            obj.BackgroundColorableComponents = value;
+            obj.listenForBackgroundChange();
+            obj.updateBackgroundColorableComponents()
+        end
 
     end %methods
 

widgets/+wt/+mixin/GridOrganized.m

@@ -1,6 +1,8 @@
 classdef GridOrganized < handle
     % Mixin for component to be organized within a 1x1 UIGridLayout
     %
+    
+    % Copyright 2020-2022 The MathWorks Inc.
 
     %% Properties
     properties (AbortSet, Transient, NonCopyable)

widgets/+wt/SliderSpinner.m

@@ -1,10 +1,9 @@
 classdef SliderSpinner < matlab.ui.componentcontainer.ComponentContainer & ...
-    wt.mixin.ErrorHandling & wt.mixin.GridOrganized &...
         wt.mixin.Enableable & wt.mixin.FontStyled &...
         wt.mixin.FieldColorable & wt.mixin.BackgroundColorable
     % A slider and spinner combination
 
-    % Copyright 2020-2021 The MathWorks Inc.
+    % Copyright 2020-2022 The MathWorks Inc.
 
 
     %% Public properties
@@ -71,8 +70,11 @@
 
     %% Internal Properties
     properties ( Transient, NonCopyable, ...
-            Access = {?wt.abstract.BaseWidget, ?wt.test.BaseWidgetTest, ?matlab.ui.componentcontainer.ComponentContainer} )
+            Access = {?wt.test.BaseWidgetTest, ?matlab.ui.componentcontainer.ComponentContainer} )
 
+        % Grid Layout
+        Grid (1,1) matlab.ui.container.GridLayout
+
         % Slider
         Slider (1,1) matlab.ui.control.Slider
 
@@ -88,20 +90,15 @@
 
         function setup(obj)
 
-            % Establish Grid for Control         
-            obj.establishGrid();
-
-            % Establish Background Color Listener
-            obj.BackgroundColorableComponents = obj.Grid;
-            obj.listenForBackgroundChange();
-            
             % Set default size
             obj.Position(3:4) = [200 40];
 
-            % Configure Main Grid
-            obj.Grid.Padding = 2;
-            obj.Grid.ColumnSpacing = 5;
+            % Construct Grid Layout to Manage Building Blocks
+            obj.Grid = uigridlayout(obj,[1 2]);
             obj.Grid.ColumnWidth = {'1x',75};
+            obj.Grid.ColumnSpacing = 5;
+            obj.Grid.RowHeight = {'1x'};
+            obj.Grid.Padding = [0 0 0 0];
 
             % Slider
             obj.Slider = uislider(obj.Grid);
@@ -116,6 +113,7 @@ function setup(obj)
             obj.Spinner.Limits = [0 100];
 
             % Update the internal component lists
+            obj.BackgroundColorableComponents = obj.Grid;
             obj.FontStyledComponents = [obj.Spinner, obj.Slider];
             obj.EnableableComponents = [obj.Spinner, obj.Slider];
             obj.FieldColorableComponents = [obj.Spinner];