glimmer-dsl-swt 4.18.4.8 → 4.18.5.1

data/samples/hello/hello_file_dialog.rb

@@ -20,15 +20,15 @@
 # WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 
 class HelloFileDialog
-  include Glimmer
+  include Glimmer::UI::CustomShell
   
   attr_accessor :selected_file
   
-  def initialize
+  before_body {
     @selected_file = 'Please select a file.'
-  end
+  }
   
-  def launch
+  body {
     shell {
       minimum_size 400, 0
       grid_layout
@@ -53,8 +53,8 @@ class HelloFileDialog
           self.selected_file = file_dialog.open
         }
       }
-    }.open
-  end
+    }
+  }
 end
 
-HelloFileDialog.new.launch
+HelloFileDialog.launch

data/samples/hello/hello_font_dialog.rb

@@ -0,0 +1,82 @@
+# 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.
+
+class HelloFontDialog
+  include Glimmer::UI::CustomShell
+  
+  attr_accessor :selected_font_data
+  
+  before_body {
+    @selected_font_data = FontData.new('Times New Roman', 40, swt(:bold))
+  }
+  
+  body {
+    shell {
+      grid_layout {
+        margin_width 15
+        margin_width 15
+      }
+      minimum_size 400, 0
+      
+      text 'Hello, Font Dialog!'
+      
+      label {
+        text 'Selected Font:'
+        font height: 14, style: :bold
+      }
+      
+      label(:center) {
+        layout_data(:fill, :center, true, true) {
+          vertical_indent 15
+          height_hint 200
+        }
+        background :white
+        font bind(self, 'selected_font_data')
+        text bind(self, 'selected_font_data') {|font_data|
+          style = case font_data.style
+          when swt(:normal)
+            'Normal'
+          when swt(:italic)
+            'Italic'
+          when swt(:bold)
+            'Bold'
+          when swt(:bold, :italic)
+            'Bold Italic'
+          end
+          "#{font_data.name}\n#{font_data.height}\n#{style}"
+        }
+      }
+      
+      button {
+        text "Choose Font..."
+        
+        on_widget_selected {
+          self.selected_font_data = font_dialog {
+            font_list [@selected_font_data]
+          }.open
+        }
+      }
+      
+    }
+  }
+end
+
+HelloFontDialog.launch

data/samples/hello/hello_group.rb

@@ -24,10 +24,10 @@ class HelloGroup
     attr_accessor :male, :female, :child, :teen, :adult, :senior
     
     def initialize
-      reset
+      reset!
     end
     
-    def reset
+    def reset!
       self.male = nil
       self.female = nil
       self.child = nil
@@ -37,11 +37,13 @@ class HelloGroup
     end
   end
   
-  include Glimmer
+  include Glimmer::UI::CustomShell
   
-  def launch
-    person = Person.new
-    
+  before_body {
+    @person = Person.new
+  }
+  
+  body {
     shell {
       text 'Hello, Group!'
       row_layout :vertical
@@ -54,12 +56,12 @@ class HelloGroup
         
         radio {
           text 'Male'
-          selection bind(person, :male)
+          selection bind(@person, :male)
         }
         
         radio {
           text 'Female'
-          selection bind(person, :female)
+          selection bind(@person, :female)
         }
       }
       
@@ -71,22 +73,22 @@ class HelloGroup
         
         radio {
           text 'Child'
-          selection bind(person, :child)
+          selection bind(@person, :child)
         }
         
         radio {
           text 'Teen'
-          selection bind(person, :teen)
+          selection bind(@person, :teen)
         }
         
         radio {
           text 'Adult'
-          selection bind(person, :adult)
+          selection bind(@person, :adult)
         }
         
         radio {
           text 'Senior'
-          selection bind(person, :senior)
+          selection bind(@person, :senior)
         }
       }
       
@@ -94,11 +96,11 @@ class HelloGroup
         text 'Reset'
         
         on_widget_selected do
-          person.reset
+          @person.reset!
         end
       }
-    }.open
-  end
+    }
+  }
 end
 
-HelloGroup.new.launch
+HelloGroup.launch

data/samples/hello/hello_list_multi_selection.rb

@@ -40,35 +40,37 @@ class HelloListMultiSelection
         'Saskatchewan',
         'Yukon'
       ]
-      reset_provinces
+      reset_provinces!
     end
   
-    def reset_provinces
+    def reset_provinces!
       self.provinces = ['Quebec', 'Manitoba', 'Alberta']
     end
   end
   
-  include Glimmer
+  include Glimmer::UI::CustomShell
   
-  def launch
-    person = Person.new
-    
+  before_body {
+    @person = Person.new
+  }
+  
+  body {
     shell {
       grid_layout
       
       text 'Hello, List Multi Selection!'
       
       list(:multi) {
-        selection bind(person, :provinces)
+        selection bind(@person, :provinces) # also binds to provinces_options by convention
       }
       
       button {
         text 'Reset Selections To Default Values'
         
-        on_widget_selected { person.reset_provinces }
+        on_widget_selected { @person.reset_provinces! }
       }
-    }.open
-  end
+    }
+  }
 end
 
-HelloListMultiSelection.new.launch
+HelloListMultiSelection.launch

data/samples/hello/hello_list_single_selection.rb

@@ -25,35 +25,37 @@ class HelloListSingleSelection
   
     def initialize
       self.country_options = ['', 'Canada', 'US', 'Mexico']
-      reset_country
+      reset_country!
     end
   
-    def reset_country
+    def reset_country!
       self.country = 'Canada'
     end
   end
   
-  include Glimmer
+  include Glimmer::UI::CustomShell
   
-  def launch
-    person = Person.new
-    
+  before_body {
+    @person = Person.new
+  }
+  
+  body {
     shell {
       grid_layout
       
       text 'Hello, List Single Selection!'
       
       list {
-        selection bind(person, :country)
+        selection bind(@person, :country) # also binds to country_options by convention
       }
       
       button {
         text 'Reset Selection To Default Value'
         
-        on_widget_selected { person.reset_country }
+        on_widget_selected { @person.reset_country! }
       }
-    }.open
-  end
+    }
+  }
 end
 
-HelloListSingleSelection.new.launch
+HelloListSingleSelection.launch

data/samples/hello/hello_progress_bar.rb

@@ -0,0 +1,125 @@
+# 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.
+
+class HelloProgressBar
+  include Glimmer::UI::CustomShell
+  
+  class ProgressModel
+    attr_accessor :minimum, :maximum, :selection, :delay
+  end
+        
+  before_body {
+    @progress_model = ProgressModel.new
+    @progress_model.minimum = 0
+    @progress_model.maximum = 100
+    @progress_model.selection = 0
+    @progress_model.delay = 0.01
+  }
+
+  body {
+    shell {
+      grid_layout(4, true)
+      
+      text 'Hello, Progress Bar!'
+      
+      progress_bar(:indeterminate) {
+        layout_data(:fill, :center, true, false) {
+          horizontal_span 4
+        }
+      }
+      
+      label {
+        text 'Minimum'
+      }
+      
+      label {
+        text 'Maximum'
+      }
+      
+      label {
+        text 'Selection'
+      }
+      
+      label {
+        text 'Delay in Seconds'
+      }
+      
+      spinner {
+        selection bind(@progress_model, :minimum)
+      }
+      
+      spinner {
+        selection bind(@progress_model, :maximum)
+      }
+      
+      spinner {
+        selection bind(@progress_model, :selection)
+      }
+        
+      spinner {
+        digits 2
+        minimum 1
+        maximum 200
+        selection bind(@progress_model, :delay, on_read: ->(v) {v.to_f*100.0}, on_write: ->(v) {v.to_f/100.0})
+      }
+          
+      progress_bar {
+        layout_data(:fill, :center, true, false) {
+          horizontal_span 4
+        }
+        minimum bind(@progress_model, :minimum)
+        maximum bind(@progress_model, :maximum)
+        selection bind(@progress_model, :selection)
+      }
+      
+      progress_bar(:vertical) {
+        layout_data(:fill, :center, true, false) {
+          horizontal_span 4
+        }
+        minimum bind(@progress_model, :minimum)
+        maximum bind(@progress_model, :maximum)
+        selection bind(@progress_model, :selection)
+      }
+      
+      button {
+        layout_data(:fill, :center, true, false) {
+          horizontal_span 4
+        }
+        text "Start"
+        
+        on_widget_selected {
+          # if a previous thread is running, then kill first
+          # (killing is not dangerous since it is only a thread about updating progress)
+          @current_thread&.kill
+          @current_thread = Thread.new {
+            @progress_model.selection = @progress_model.minimum
+            (@progress_model.minimum..@progress_model.maximum).to_a.each do |n|
+              @progress_model.selection = n
+              sleep(@progress_model.delay)
+            end
+          }
+        }
+      }
+    }
+  }
+end
+
+HelloProgressBar.launch

data/samples/hello/hello_radio.rb

@@ -24,10 +24,10 @@ class HelloRadio
     attr_accessor :male, :female, :child, :teen, :adult, :senior
     
     def initialize
-      reset
+      reset!
     end
     
-    def reset
+    def reset!
       self.male = nil
       self.female = nil
       self.child = nil
@@ -37,11 +37,13 @@ class HelloRadio
     end
   end
   
-  include Glimmer
+  include Glimmer::UI::CustomShell
   
-  def launch
-    person = Person.new
-    
+  before_body {
+    @person = Person.new
+  }
+  
+  body {
     shell {
       text 'Hello, Radio!'
       row_layout :vertical
@@ -56,12 +58,12 @@ class HelloRadio
         
         radio {
           text 'Male'
-          selection bind(person, :male)
+          selection bind(@person, :male)
         }
         
         radio {
           text 'Female'
-          selection bind(person, :female)
+          selection bind(@person, :female)
         }
       }
       
@@ -75,22 +77,22 @@ class HelloRadio
         
         radio {
           text 'Child'
-          selection bind(person, :child)
+          selection bind(@person, :child)
         }
         
         radio {
           text 'Teen'
-          selection bind(person, :teen)
+          selection bind(@person, :teen)
         }
         
         radio {
           text 'Adult'
-          selection bind(person, :adult)
+          selection bind(@person, :adult)
         }
         
         radio {
           text 'Senior'
-          selection bind(person, :senior)
+          selection bind(@person, :senior)
         }
       }
       
@@ -98,11 +100,11 @@ class HelloRadio
         text 'Reset'
         
         on_widget_selected do
-          person.reset
+          @person.reset!
         end
       }
-    }.open
-  end
+    }
+  }
 end
 
-HelloRadio.new.launch
+HelloRadio.launch