glimmer-dsl-swt 4.17.4.1 → 4.17.8.0

data/lib/glimmer/ui/custom_shell.rb

@@ -1,5 +1,5 @@
 # Copyright (c) 2007-2020 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
@@ -7,10 +7,10 @@
 # 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
@@ -64,4 +64,4 @@ module Glimmer
       end
     end
   end
-end
+end

data/lib/glimmer/ui/custom_widget.rb

@@ -213,6 +213,7 @@ module Glimmer
       def has_instance_method?(method_name)
         respond_to?(method_name) and 
           !swt_widget&.respond_to?(method_name) and
+          (method(method_name) rescue nil) and
           !method(method_name)&.source_location&.first&.include?('glimmer/dsl/engine.rb') and 
           !method(method_name)&.source_location&.first&.include?('glimmer/swt/widget_proxy.rb')
       end
@@ -255,6 +256,8 @@ module Glimmer
       end
 
       def method_missing(method, *args, &block)
+        # TODO Consider supporting a glimmer error silencing option for methods defined here
+        # but fail the glimmer DSL for the right reason to avoid seeing noise in the log output
         if can_handle_observation_request?(method)
           handle_observation_request(method, &block)
         else

data/samples/elaborate/meta_sample.rb

@@ -20,7 +20,7 @@ class Sample
   end
   
   def content
-    @content ||= File.read(file)
+    @content = File.read(file)
   end
     
   def launch
@@ -58,12 +58,12 @@ class SampleDirectory
     
     def all_samples
       @all_samples ||= sample_directories.map(&:samples).reduce(:+)
-    end
+    end    
   end
   
   include Glimmer # used for observe syntax
   
-  attr_accessor :file
+  attr_accessor :file, :selected_sample_name
   
   def initialize(file)
     self.file = file
@@ -92,7 +92,20 @@ class SampleDirectory
       end
     end
     @samples
-  end  
+  end
+  
+  def selected_sample_name_options
+    samples.map(&:name)
+  end
+  
+  def selected_sample_name=(selected_name)
+    @selected_sample_name = selected_name
+    unless selected_name.nil?
+      (self.class.sample_directories - [self]).each { |sample_dir| sample_dir.selected_sample_name = nil }
+      self.class.selected_sample = samples.detect { |sample| sample.name == @selected_sample_name }
+    end
+  end
+  
 end
 
 class MetaSampleApplication
@@ -100,6 +113,7 @@ class MetaSampleApplication
   
   def launch
     shell {
+      minimum_size 1280, 768
       text 'Glimmer Meta-Sample (The Sample of Samples)'
       
       on_swt_show {
@@ -109,42 +123,33 @@ class MetaSampleApplication
       sash_form {
         composite {
           grid_layout 1, false
-          
-          scrolled_composite {
-            layout_data(:fill, :fill, true, true)
             
-            composite {
-              SampleDirectory.sample_directories.each { |sample_directory|
-                group {
-                  layout_data(:fill, :fill, true, true)
-                  grid_layout 2, false
-                  text sample_directory.name
-                  font height: 30
-                  
-                  sample_directory.samples.each { |sample|
-                    label_radio = radio {
-                      selection bind(sample, :selected)
-                    }
-                    label {
-                      text sample.name
-                      font height: 30
-                      
-                      on_mouse_up {
-                        sample.selected = true
-                      }
-                    }
+          expand_bar {
+            layout_data(:fill, :fill, true, true)
+            font height: 30
+                        
+            SampleDirectory.sample_directories.each { |sample_directory|
+              expand_item {
+                layout_data(:fill, :fill, true, true)
+                text "#{sample_directory.name} Samples"
+                
+                radio_group { |radio_group_proxy|
+                  row_layout(:vertical) {
+                    fill true
                   }
+                  selection bind(sample_directory, :selected_sample_name)
+                  font height: 24
                 }
               }
             }
           }
           
           button {
-            layout_data(:center, :center, false, false) {
-              height_hint 150
+            layout_data(:fill, :center, true, false) {
+              height_hint 120
             }
             text 'Launch Sample'
-            font height: 45
+            font height: 30
             on_widget_selected {
               SampleDirectory.selected_sample.launch
             }
@@ -157,7 +162,7 @@ class MetaSampleApplication
           caret nil
         }
         
-        weights 1, 2
+        weights 4, 9
       }            
     }.open
   end

data/samples/hello/hello_checkbox.rb

@@ -0,0 +1,85 @@
+# Copyright (c) 2007-2020 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.
+
+class HelloCheckbox
+  class Person
+    attr_accessor :skiing, :snowboarding, :snowmobiling, :snowshoeing
+    
+    def initialize
+      reset_activities
+    end
+    
+    def reset_activities
+      self.skiing = false
+      self.snowboarding = true
+      self.snowmobiling = false
+      self.snowshoeing = false
+    end
+  end
+  
+  include Glimmer
+  
+  def launch
+    person = Person.new
+    
+    shell {
+      text 'Hello, Checkbox!'      
+      row_layout :vertical
+      
+      label {
+        text 'Check all snow activities you are interested in:'
+        font style: :bold
+      }
+      
+      composite {
+        checkbox {
+          text 'Skiing'
+          selection bind(person, :skiing)
+        }
+        
+        checkbox {
+          text 'Snowboarding'
+          selection bind(person, :snowboarding)
+        }
+        
+        checkbox {
+          text 'Snowmobiling'
+          selection bind(person, :snowmobiling)
+        }
+        
+        checkbox {
+          text 'Snowshoeing'
+          selection bind(person, :snowshoeing)
+        }
+      }
+      
+      button {
+        text 'Reset Activities'
+        
+        on_widget_selected do
+          person.reset_activities
+        end
+      }
+    }.open
+  end
+end
+
+HelloCheckbox.new.launch

data/samples/hello/hello_checkbox_group.rb

@@ -0,0 +1,68 @@
+# Copyright (c) 2007-2020 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.
+
+class HelloCheckboxGroup
+  class Person
+    attr_accessor :activities
+    
+    def initialize
+      reset_activities
+    end
+    
+    def activities_options
+      ['Skiing', 'Snowboarding', 'Snowmobiling', 'Snowshoeing']
+    end
+    
+    def reset_activities
+      self.activities = ['Snowboarding']
+    end
+  end
+  
+  include Glimmer
+  
+  def launch
+    person = Person.new
+    
+    shell {
+      text 'Hello, Checkbox Group!'
+      row_layout :vertical
+      
+      label {
+        text 'Check all snow activities you are interested in:'
+        font style: :bold
+      }
+      
+      checkbox_group {
+        selection bind(person, :activities)
+      }
+    
+      button {
+        text 'Reset Activities'
+        
+        on_widget_selected do
+          person.reset_activities
+        end
+      }
+    }.open
+  end
+end
+
+HelloCheckboxGroup.new.launch

data/samples/hello/hello_combo.rb

@@ -19,20 +19,20 @@
 # OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
 # WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 
-class Person
-  attr_accessor :country, :country_options
-
-  def initialize
-    self.country_options = ['', 'Canada', 'US', 'Mexico']
-    reset_country
-  end
-
-  def reset_country
-    self.country = 'Canada'
+class HelloCombo
+  class Person
+    attr_accessor :country, :country_options
+  
+    def initialize
+      self.country_options = ['', 'Canada', 'US', 'Mexico']
+      reset_country
+    end
+  
+    def reset_country
+      self.country = 'Canada'
+    end
   end
-end
 
-class HelloCombo
   include Glimmer
   
   def launch

data/samples/hello/hello_directory_dialog.rb

@@ -0,0 +1,60 @@
+# Copyright (c) 2007-2020 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.
+
+class HelloDirectoryDialog
+  include Glimmer
+  
+  attr_accessor :selected_directory
+  
+  def initialize
+    @selected_directory = 'Please select a directory.'
+  end
+  
+  def launch
+    shell {
+      minimum_size 400, 0
+      grid_layout
+      
+      text 'Hello, Directory Dialog!'
+      
+      label {
+        text 'Selected Directory:'
+        font height: 14, style: :bold
+      }
+      
+      label {
+        layout_data :fill, :center, true, false
+        text bind(self, :selected_directory)
+        font height: 14
+      }
+      
+      button {
+        text "Browse..."
+        
+        on_widget_selected {
+          self.selected_directory = directory_dialog.open
+        }
+      }
+    }.open
+  end
+end
+
+HelloDirectoryDialog.new.launch

data/samples/hello/hello_expand_bar.rb

@@ -0,0 +1,110 @@
+# Copyright (c) 2007-2020 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.
+
+class HelloExpandBar
+  include Glimmer
+  
+  def launch
+    shell {
+      grid_layout(1, false) {
+        margin_width 0
+        margin_height 0
+      }
+      minimum_size 320, 240
+      text 'Hello, Expand Bar!'
+      
+      @status_label = label(:center) {
+        text ' '
+        layout_data :fill, :center, true, false
+        font height: 24
+      }
+      
+      expand_bar {
+        layout_data :fill, :fill, true, true
+        
+        expand_item {
+          text 'Productivity'
+          
+          button {
+            text 'Word Processing'
+          }
+          button {
+            text 'Spreadsheets'
+          }
+          button {
+            text 'Presentations'
+          }
+          button {
+            text 'Database'
+          }
+          composite # just filler
+        }
+        
+        expand_item {
+          text 'Tools'
+          
+          button {
+            text 'Calculator'
+          }
+          button {
+            text 'Unit Converter'
+          }
+          button {
+            text 'Currency Converter'
+          }
+          button {
+            text 'Scientific Calculator'
+          }
+          composite # just filler
+        }
+        
+        expand_item {
+          text 'Reading'
+          
+          button {
+            text 'eBooks'
+          }
+          button {
+            text 'News'
+          }
+          button {
+            text 'Blogs'
+          }
+          button {
+            text 'Papers'
+          }
+          composite # just filler
+        }
+        
+        on_item_expanded { |expand_event|
+          @status_label.text = "#{expand_event.item.text} Expanded!"
+        }
+        
+        on_item_collapsed { |expand_event|
+          @status_label.text = "#{expand_event.item.text} Collapsed!"
+        }
+        
+      }
+    }.open
+  end
+end
+
+HelloExpandBar.new.launch