glimmer-dsl-swt 4.18.4.5 → 4.18.4.6

data/samples/hello/hello_group.rb

@@ -1,104 +1,104 @@
-# 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 HelloGroup
-  class Person
-    attr_accessor :male, :female, :child, :teen, :adult, :senior
-    
-    def initialize
-      reset
-    end
-    
-    def reset
-      self.male = nil
-      self.female = nil
-      self.child = nil
-      self.teen = nil
-      self.adult = true
-      self.senior = nil
-    end
-  end
-  
-  include Glimmer
-  
-  def launch
-    person = Person.new
-    
-    shell {
-      text 'Hello, Group!'
-      row_layout :vertical
-      
-      group {
-        row_layout
-        
-        text 'Gender'
-        font style: :bold
-        
-        radio {
-          text 'Male'
-          selection bind(person, :male)
-        }
-        
-        radio {
-          text 'Female'
-          selection bind(person, :female)
-        }
-      }
-      
-      group {
-        row_layout
-        
-        text 'Age Group'
-        font style: :bold
-        
-        radio {
-          text 'Child'
-          selection bind(person, :child)
-        }
-        
-        radio {
-          text 'Teen'
-          selection bind(person, :teen)
-        }
-        
-        radio {
-          text 'Adult'
-          selection bind(person, :adult)
-        }
-        
-        radio {
-          text 'Senior'
-          selection bind(person, :senior)
-        }
-      }
-      
-      button {
-        text 'Reset'
-        
-        on_widget_selected do
-          person.reset
-        end
-      }
-    }.open
-  end
-end
-
-HelloGroup.new.launch
+# 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 HelloGroup
+  class Person
+    attr_accessor :male, :female, :child, :teen, :adult, :senior
+    
+    def initialize
+      reset
+    end
+    
+    def reset
+      self.male = nil
+      self.female = nil
+      self.child = nil
+      self.teen = nil
+      self.adult = true
+      self.senior = nil
+    end
+  end
+  
+  include Glimmer
+  
+  def launch
+    person = Person.new
+    
+    shell {
+      text 'Hello, Group!'
+      row_layout :vertical
+      
+      group {
+        row_layout
+        
+        text 'Gender'
+        font style: :bold
+        
+        radio {
+          text 'Male'
+          selection bind(person, :male)
+        }
+        
+        radio {
+          text 'Female'
+          selection bind(person, :female)
+        }
+      }
+      
+      group {
+        row_layout
+        
+        text 'Age Group'
+        font style: :bold
+        
+        radio {
+          text 'Child'
+          selection bind(person, :child)
+        }
+        
+        radio {
+          text 'Teen'
+          selection bind(person, :teen)
+        }
+        
+        radio {
+          text 'Adult'
+          selection bind(person, :adult)
+        }
+        
+        radio {
+          text 'Senior'
+          selection bind(person, :senior)
+        }
+      }
+      
+      button {
+        text 'Reset'
+        
+        on_widget_selected do
+          person.reset
+        end
+      }
+    }.open
+  end
+end
+
+HelloGroup.new.launch

data/samples/hello/hello_link.rb

@@ -1,80 +1,80 @@
-# 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.
-
-include Glimmer
-
-shell { |main_shell|
-  grid_layout {
-    margin_width 20
-    margin_height 10
-  }
-  
-  background :white
-  text 'Hello, Link!'
-  
-  @link = link {
-    background :white
-    link_foreground :dark_green
-    font height: 16
-    text <<~MULTI_LINE_STRING
-    
-      You may click on any <a>link</a> to get help.
-      
-      How do you know <a href="which-link-href-value">which link</a> you clicked?
-      
-      Just keep clicking <a href="all links">links</a> to find out!
-    MULTI_LINE_STRING
-        
-    on_widget_selected { |selection_event|
-      # This retrieves the clicked link href (or contained text if no href is set)
-      @selected_link = selection_event.text
-    }
-    on_mouse_up { |mouse_event|
-      unless @selected_link.nil?
-        @help_shell.close unless @help_shell.nil? || @help_shell.disposed?
-        @help_shell = shell(:no_trim) {
-          grid_layout {
-            margin_width 10
-            margin_height 10
-          }
-          
-          background :yellow
-          
-          label {
-            background :yellow
-            text "Did someone ask for help about \"#{@selected_link}\"?\nYou don't really need help. You did it!"
-          }
-          
-          on_swt_show {
-            x = main_shell.location.x + @link.location.x + mouse_event.x
-            y = main_shell.location.y + @link.location.y + mouse_event.y + 20
-            @help_shell.location = Point.new(x, y)
-          }
-          on_focus_lost {
-            @selected_link = nil
-            @help_shell.close
-          }
-        }
-        @help_shell.open
-      end
-    }
-  }
-}.open
+# 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.
+
+include Glimmer
+
+shell { |main_shell|
+  grid_layout {
+    margin_width 20
+    margin_height 10
+  }
+  
+  background :white
+  text 'Hello, Link!'
+  
+  @link = link {
+    background :white
+    link_foreground :dark_green
+    font height: 16
+    text <<~MULTI_LINE_STRING
+    
+      You may click on any <a>link</a> to get help.
+      
+      How do you know <a href="which-link-href-value">which link</a> you clicked?
+      
+      Just keep clicking <a href="all links">links</a> to find out!
+    MULTI_LINE_STRING
+        
+    on_widget_selected { |selection_event|
+      # This retrieves the clicked link href (or contained text if no href is set)
+      @selected_link = selection_event.text
+    }
+    on_mouse_up { |mouse_event|
+      unless @selected_link.nil?
+        @help_shell.close unless @help_shell.nil? || @help_shell.disposed?
+        @help_shell = shell(:no_trim) {
+          grid_layout {
+            margin_width 10
+            margin_height 10
+          }
+          
+          background :yellow
+          
+          label {
+            background :yellow
+            text "Did someone ask for help about \"#{@selected_link}\"?\nYou don't really need help. You did it!"
+          }
+          
+          on_swt_show {
+            x = main_shell.location.x + @link.location.x + mouse_event.x
+            y = main_shell.location.y + @link.location.y + mouse_event.y + 20
+            @help_shell.location = Point.new(x, y)
+          }
+          on_focus_lost {
+            @selected_link = nil
+            @help_shell.close
+          }
+        }
+        @help_shell.open
+      end
+    }
+  }
+}.open

data/samples/hello/hello_list_multi_selection.rb

@@ -1,74 +1,74 @@
-# 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 HelloListMultiSelection
-  class Person
-    attr_accessor :provinces, :provinces_options
-  
-    def initialize
-      self.provinces_options = [
-        '',
-        'Alberta',
-        'British Columbia',
-        'Manitoba',
-        'New Brunswick',
-        'Newfoundland and Labrador',
-        'Northwest Territories',
-        'Nova Scotia',
-        'Nunavut',
-        'Ontario',
-        'Prince Edward Island',
-        'Quebec',
-        'Saskatchewan',
-        'Yukon'
-      ]
-      reset_provinces
-    end
-  
-    def reset_provinces
-      self.provinces = ['Quebec', 'Manitoba', 'Alberta']
-    end
-  end
-  
-  include Glimmer
-  
-  def launch
-    person = Person.new
-    
-    shell {
-      grid_layout
-      
-      text 'Hello, List Multi Selection!'
-      
-      list(:multi) {
-        selection bind(person, :provinces)
-      }
-      
-      button {
-        text 'Reset Selections To Default Values'
-        
-        on_widget_selected { person.reset_provinces }
-      }
-    }.open
-  end
-end
-
-HelloListMultiSelection.new.launch
+# 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 HelloListMultiSelection
+  class Person
+    attr_accessor :provinces, :provinces_options
+  
+    def initialize
+      self.provinces_options = [
+        '',
+        'Alberta',
+        'British Columbia',
+        'Manitoba',
+        'New Brunswick',
+        'Newfoundland and Labrador',
+        'Northwest Territories',
+        'Nova Scotia',
+        'Nunavut',
+        'Ontario',
+        'Prince Edward Island',
+        'Quebec',
+        'Saskatchewan',
+        'Yukon'
+      ]
+      reset_provinces
+    end
+  
+    def reset_provinces
+      self.provinces = ['Quebec', 'Manitoba', 'Alberta']
+    end
+  end
+  
+  include Glimmer
+  
+  def launch
+    person = Person.new
+    
+    shell {
+      grid_layout
+      
+      text 'Hello, List Multi Selection!'
+      
+      list(:multi) {
+        selection bind(person, :provinces)
+      }
+      
+      button {
+        text 'Reset Selections To Default Values'
+        
+        on_widget_selected { person.reset_provinces }
+      }
+    }.open
+  end
+end
+
+HelloListMultiSelection.new.launch