glimmer-dsl-tk 0.0.54 → 0.0.57

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 556b89d33cee530135e72cd6f31a79a355db86cf45bbacfd65dbf14b8184b4c3
-  data.tar.gz: 7c5c0750b19380e8561a16e7789273bd742d33e50294d8100cd5759b6fa2d329
+  metadata.gz: 0e0e1ed1843f904d42892c7fe2546383717da65d7cfd0690b1b66101a5b68576
+  data.tar.gz: af96af00f8b06606ac584ab14d5d8d360977a58ec354053a0826edc470c0d57f
 SHA512:
-  metadata.gz: 2c25d0b5f8a677a82adf158fa7685a4dfb1e4ea006d4fc6a134d1046c3468e3af1261f37aa66678f802a0f4b0d6b2951ea49bf89cab76db89bcedd92d8eb78cd
-  data.tar.gz: 4bc9c4b2dd59849206e95f85118b230735d72bfb06810fa38fb39a71d4fc3419dc4415b1d5261a465dbf07a0b4d183a673f75f24872a8f4b2ece0f362bde1ad3
+  metadata.gz: '01787afce29bc0b1d4656b8ab646f0eb4501a8b8feb23979ad99970f6e5d6bb75d5945bb0b9a9a91cdb34f36d6bdf9226ec3e3aa60368206cd98b40daa2cd0a1'
+  data.tar.gz: 677f8d13ab20b7857c613167d1d21eed0dec3f1b19a8b29ba4b4cec49545186446c2c9bacbaf9e0741c16ceb2d20e60136c482dc6e78783d8b1d435ed4239be8

data/CHANGELOG.md

@@ -1,8 +1,22 @@
 # Change Log
 
+## 0.0.57
+
+- Hello, Theme! sample
+
+## 0.0.56
+
+- Hello, Progressbar! sample
+- Upgrade to glimmer 2.7.3
+
+## 0.0.55
+
+- Hello, Scale! sample
+- `scale` `variable` data-binding
+
 ## 0.0.54
 
-- Hello, Labelframe!
+- Hello, Labelframe! sample
 - Add default padding to `labelframe`
 
 ## 0.0.53

data/README.md

@@ -1,5 +1,5 @@
-# [<img src="https://raw.githubusercontent.com/AndyObtiva/glimmer/master/images/glimmer-logo-hi-res.png" height=85 />](https://github.com/AndyObtiva/glimmer) Glimmer DSL for Tk 0.0.54
-## MRI Ruby Desktop Development GUI Library
+# [<img src="https://raw.githubusercontent.com/AndyObtiva/glimmer/master/images/glimmer-logo-hi-res.png" height=85 />](https://github.com/AndyObtiva/glimmer) Glimmer DSL for Tk 0.0.57
+## Ruby Tk Desktop Development GUI Library
 [![Gem Version](https://badge.fury.io/rb/glimmer-dsl-tk.svg)](http://badge.fury.io/rb/glimmer-dsl-tk)
 [![Ruby](https://github.com/AndyObtiva/glimmer-dsl-tk/actions/workflows/ruby.yml/badge.svg)](https://github.com/AndyObtiva/glimmer-dsl-tk/actions/workflows/ruby.yml)
 [![Coverage Status](https://coveralls.io/repos/github/AndyObtiva/glimmer-dsl-tk/badge.svg?branch=master)](https://coveralls.io/github/AndyObtiva/glimmer-dsl-tk?branch=master)
@@ -57,7 +57,7 @@ DSL | Platforms | Native? | Vector Graphics? | Pros | Cons | Prereqs
 [Glimmer DSL for SWT (JRuby Desktop Development GUI Framework)](https://github.com/AndyObtiva/glimmer-dsl-swt) | Mac / Windows / Linux | Yes | Yes (Canvas Shape DSL) | Very Mature / Scaffolding / Native Executable Packaging / Custom Widgets | Slow JRuby Startup Time / Heavy Memory Footprint | Java / JRuby
 [Glimmer DSL for Opal (Pure Ruby Web GUI and Auto-Webifier of Desktop Apps)](https://github.com/AndyObtiva/glimmer-dsl-opal) | All Web Browsers | No | Yes (Canvas Shape DSL) | Simpler than All JavaScript Technologies / Auto-Webify Desktop Apps | Setup Process / Incomplete Alpha | Rails
 [Glimmer DSL for LibUI (Prerequisite-Free Ruby Desktop Development GUI Library)](https://github.com/AndyObtiva/glimmer-dsl-libui) | Mac / Windows / Linux | Yes | Yes (Area API) | Fast Startup Time / Light Memory Footprint | LibUI is an Incomplete Mid-Alpha Only | None Other Than MRI Ruby
-[Glimmer DSL for Tk (MRI Ruby Desktop Development GUI Library)](https://github.com/AndyObtiva/glimmer-dsl-tk) | Mac / Windows / Linux | Some Native-Themed Widgets (Not Truly Native) | Yes (Canvas) | Fast Startup Time / Light Memory Footprint | Complicated setup / Widgets Do Not Look Truly Native, Espcially on Linux | ActiveTcl / MRI Ruby
+[Glimmer DSL for Tk (Ruby Tk Desktop Development GUI Library)](https://github.com/AndyObtiva/glimmer-dsl-tk) | Mac / Windows / Linux | Some Native-Themed Widgets (Not Truly Native) | Yes (Canvas) | Fast Startup Time / Light Memory Footprint | Complicated setup / Widgets Do Not Look Truly Native, Espcially on Linux | ActiveTcl / MRI Ruby
 [Glimmer DSL for GTK (Ruby-GNOME Desktop Development GUI Library)](https://github.com/AndyObtiva/glimmer-dsl-gtk) | Mac / Windows / Linux | Only on Linux | Yes (Cairo) | Complete Access to GNOME Features on Linux (Forte) | Not Native on Mac and Windows | None Other Than MRI Ruby on Linux / Brew Packages on Mac / MSYS & MING Toolchains on Windows / MRI Ruby
 [Glimmer DSL for FX (FOX Toolkit Ruby Desktop Development GUI Library)](https://github.com/AndyObtiva/glimmer-dsl-fx) | Mac (requires XQuartz) / Windows / Linux | No | Yes (Canvas) | No Prerequisites on Windows (Forte Since Binaries Are Included Out of The Box) | Widgets Do Not Look Native / Mac Usage Obtrusively Starts XQuartz | None Other Than MRI Ruby on Windows / XQuarts on Mac / MRI Ruby
 [Glimmer DSL for JFX (JRuby JavaFX Desktop Development GUI Library)](https://github.com/AndyObtiva/glimmer-dsl-jfx) | Mac / Windows / Linux | No | Yes (javafx.scene.shape and javafx.scene.canvas) | Rich in Custom Widgets | Slow JRuby Startup Time / Heavy Memory Footprint / Widgets Do Not Look Native | Java / JRuby / JavaFX SDK
@@ -100,6 +100,7 @@ DSL | Platforms | Native? | Vector Graphics? | Pros | Cons | Prereqs
     - [List Multi Selection Data-Binding](#list-multi-selection-data-binding)
     - [Entry Data-Binding](#entry-data-binding)
     - [Text Data-Binding](#text-data-binding)
+    - [Scale Data-Binding](#scale-data-binding)
     - [Spinbox Data-Binding](#spinbox-data-binding)
     - [Checkbutton Data-Binding](#checkbutton-data-binding)
     - [Radiobutton Data-Binding](#radiobutton-data-binding)
@@ -132,6 +133,9 @@ DSL | Platforms | Native? | Vector Graphics? | Pros | Cons | Prereqs
     - [Hello, Menu Bar!](#hello-menu-bar)
     - [Hello, Contextual Menu!](#hello-contextual-menu)
     - [Hello, Labelframe!](#hello-labelframe)
+    - [Hello, Scale!](#hello-scale)
+    - [Hello, Progressbar!](#hello-progressbar)
+    - [Hello, Theme!](#hello-theme)
   - [Applications](#applications)
     - [Glimmer Tk Calculator](#glimmer-tk-calculator)
     - [Y3network Ruby UI](#y3network-ruby-ui)
@@ -191,7 +195,7 @@ gem install glimmer-dsl-tk
 
 Add the following to `Gemfile`:
 ```
-gem 'glimmer-dsl-tk', '0.0.54'
+gem 'glimmer-dsl-tk', '0.0.57'
 ```
 
 And, then run:
@@ -768,6 +772,50 @@ It automatically handles all the Tk plumbing behind the scenes.
 
 More details can be found in [Hello, Text!](#hello-text) sample below.
 
+### Scale Data-Binding
+
+Example:
+
+This assumes a `Person` model with an `age` attribute.
+
+```ruby
+  spinbox {
+    orient 'horizontal' # can be 'vertical' too
+    length 200
+    from 0.0
+    to 100.0
+    variable <=> [person, :age, on_write: ->(val) {val.to_i}]
+  }
+```
+
+That code binds the `variable` value of the `scale` to the `age` attribute on the `person` model.
+
+It automatically handles all the Tk plumbing behind the scenes.
+
+More details can be found in [Hello, Scale!](#hello-scale) sample below.
+
+### Progressbar Data-Binding
+
+Example:
+
+This assumes a `Worker` model with a `progress_value` attribute.
+
+```ruby
+progressbar {
+  orient 'horizontal' # can be vertical too
+  length 200
+  mode 'determinate'
+  maximum 100
+  value <= [worker, :progress_value]
+}
+```
+
+That code binds the value of the `progressbar` to the `progress_value` attribute on the `worker` model.
+
+It automatically handles all the Tk plumbing behind the scenes.
+
+More details can be found in [Hello, Progressbar!](#hello-progressbar) sample below.
+
 ### Spinbox Data-Binding
 
 Example:
@@ -3894,6 +3942,320 @@ Glimmer app:
 
 ![glimmer dsl tk screenshot sample hello label-frame](images/glimmer-dsl-tk-screenshot-sample-hello-labelframe.png)
 
+### Hello, Scale!
+
+Glimmer code (from [samples/hello/hello_scale.rb](samples/hello/hello_scale.rb)):
+
+```ruby
+require 'glimmer-dsl-tk'
+
+class HelloScale
+  include Glimmer
+  
+  attr_accessor :scale_value
+  
+  def initialize
+    self.scale_value = 50
+  end
+  
+  def launch
+    root {
+      text 'Hello, Scale!'
+      
+      label {
+        anchor 'center'
+        text <= [self, :scale_value]
+      }
+      
+      scale {
+        orient 'horizontal'
+        length 200
+        from 0.0
+        to 100.0
+        variable <=> [self, :scale_value, on_write: ->(val) {val.to_i}]
+      }
+    }.open
+  end
+end
+
+HelloScale.new.launch
+```
+
+Run with [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed:
+
+```
+ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_scale'"
+```
+
+Alternatively, run from cloned project without [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed:
+
+```
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_scale.rb
+```
+
+Glimmer app:
+
+![glimmer dsl tk screenshot sample hello scale](images/glimmer-dsl-tk-screenshot-sample-hello-scale.png)
+
+### Hello, Progressbar!
+
+Glimmer code (from [samples/hello/hello_progressbar.rb](samples/hello/hello_progressbar.rb)):
+
+```ruby
+require 'glimmer-dsl-tk'
+
+class HelloProgressbar
+  include Glimmer
+  
+  attr_accessor :progress_value, :maximum_value, :delay_value
+  
+  def initialize
+    self.progress_value = 0
+    self.maximum_value = 100
+    self.delay_value = 0.01
+    
+    Thread.new do
+      loop do
+        self.progress_value = (self.progress_value.to_i + 1) % (maximum_value.to_i + 1)
+        sleep(delay_value) # yields to main thread
+      end
+    end
+  end
+  
+  def launch
+    root {
+      text 'Hello, Progressbar!'
+      
+      progressbar {
+        grid row: 0, column: 0, columnspan: 3
+        orient 'horizontal'
+        length 200
+        mode 'indeterminate'
+        maximum <= [self, :maximum_value]
+        value <= [self, :progress_value]
+      }
+      
+      label {
+        grid row: 1, column: 0
+        text 'Value'
+      }
+      
+      label {
+        grid row: 1, column: 1
+        text 'Maximum'
+      }
+      
+      label {
+        grid row: 1, column: 2
+        text 'Delay in Seconds'
+      }
+      
+      spinbox {
+        grid row: 2, column: 0
+        from 0.0
+        to 100.0
+        increment 1.0
+        format '%0f'
+        text <=> [self, :progress_value, on_read: :to_i, on_write: :to_i]
+      }
+      
+      spinbox {
+        grid row: 2, column: 1
+        from 1.0
+        to 100.0
+        increment 1.0
+        format '%0f'
+        text <=> [self, :maximum_value, on_read: :to_i, on_write: :to_i]
+      }
+      
+      spinbox {
+        grid row: 2, column: 2
+        from 0.01
+        to 1.0
+        increment 0.1
+        format '%0.2f'
+        text <=> [self, :delay_value, on_write: ->(val) {[val.to_f, 1.0].min}]
+      }
+      
+      progressbar {
+        grid row: 3, column: 0, columnspan: 3
+        orient 'horizontal'
+        length 200
+        mode 'determinate'
+        maximum <= [self, :maximum_value]
+        value <= [self, :progress_value]
+      }
+      
+      progressbar {
+        grid row: 4, column: 0, columnspan: 3
+        orient 'vertical'
+        length 200
+        mode 'determinate'
+        maximum <= [self, :maximum_value]
+        value <= [self, :progress_value]
+      }
+    }.open
+  end
+end
+
+HelloProgressbar.new.launch
+```
+
+Run with [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed:
+
+```
+ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_progressbar'"
+```
+
+Alternatively, run from cloned project without [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed:
+
+```
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_progressbar.rb
+```
+
+Glimmer app:
+
+![glimmer dsl tk screenshot sample hello progressbar](images/glimmer-dsl-tk-screenshot-sample-hello-progressbar.png)
+
+![glimmer dsl tk screenshot sample hello progressbar gif](images/glimmer-dsl-tk-screenshot-sample-hello-progressbar.gif)
+
+### Hello, Theme!
+
+Glimmer code (from [samples/hello/hello_theme.rb](samples/hello/hello_theme.rb)):
+
+```ruby
+require 'glimmer-dsl-tk'
+
+class HelloTheme
+  include Glimmer
+  
+  def launch
+    root {
+      title 'Hello, Theme!'
+      
+      labelframe {
+        text 'Theme'
+        
+        combobox { |cb|
+          readonly true
+          values ::Tk::Tile::Style.theme_names
+          text 'aqua'
+          
+          on('<ComboboxSelected>') do
+            ::Tk::Tile::Style.theme_use cb.tk.textvariable.value
+          end
+        }
+      }
+      
+      labelframe {
+        text 'Widgets'
+        
+        notebook {
+          frame(text: 'One') {
+            label {
+              text 'label'
+            }
+            
+            entry {
+              text 'entry'
+            }
+            
+            entry {
+              text 'password'
+              show '*'
+            }
+            
+            spinbox {
+              text '100'
+            }
+          }
+        
+          frame(text: 'Two') {
+            button {
+              text 'button'
+            }
+            
+            checkbutton {
+              text 'checkbutton'
+            }
+            
+            radiobutton {
+              text 'radiobutton'
+            }
+          }
+        
+          frame(text: 'Three') {
+            scale {
+              orient 'horizontal'
+              length 200
+              from 0.0
+              to 100.0
+              value 50
+            }
+            
+            progressbar {
+              orient 'horizontal'
+              length 200
+              mode 'determinate'
+              maximum 100
+              value 50
+            }
+            
+            progressbar {
+              orient 'vertical'
+              length 100
+              mode 'determinate'
+              maximum 100
+              value 50
+            }
+          }
+        }
+      }
+    }.open
+  end
+end
+
+HelloTheme.new.launch
+```
+
+Run with [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed:
+
+```
+ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_theme'"
+```
+
+Alternatively, run from cloned project without [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed:
+
+```
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_theme.rb
+```
+
+Glimmer app:
+
+Aqua Theme Tab One
+
+![glimmer dsl tk screenshot sample hello theme aqua 1](images/glimmer-dsl-tk-screenshot-sample-hello-theme-aqua-tab-one.png)
+
+Aqua Theme Tab Two
+
+![glimmer dsl tk screenshot sample hello theme aqua 2](images/glimmer-dsl-tk-screenshot-sample-hello-theme-aqua-tab-two.png)
+
+Aqua Theme Tab Three
+
+![glimmer dsl tk screenshot sample hello theme aqua 3](images/glimmer-dsl-tk-screenshot-sample-hello-theme-aqua-tab-three.png)
+
+Clam Theme Tab One
+
+![glimmer dsl tk screenshot sample hello theme clam 1](images/glimmer-dsl-tk-screenshot-sample-hello-theme-clam-tab-one.png)
+
+Clam Theme Tab Two
+
+![glimmer dsl tk screenshot sample hello theme clam 2](images/glimmer-dsl-tk-screenshot-sample-hello-theme-clam-tab-two.png)
+
+Clam Theme Tab Three
+
+![glimmer dsl tk screenshot sample hello theme clam 3](images/glimmer-dsl-tk-screenshot-sample-hello-theme-clam-tab-three.png)
+
 ## Applications
 
 ### Glimmer Tk Calculator

data/VERSION

@@ -1 +1 @@
-0.0.54
+0.0.57

data/lib/glimmer/tk/scale_proxy.rb

@@ -0,0 +1,48 @@
+# Copyright (c) 2020-2022 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/tk/widget_proxy'
+require 'glimmer/tk/variable_owner'
+
+module Glimmer
+  module Tk
+    # Proxy for Tk::Tile::TScale
+    #
+    # Follows the Proxy Design Pattern
+    class ScaleProxy < WidgetProxy
+      include VariableOwner
+      
+      def command_block=(proc)
+        tk.command(proc)
+      end
+    
+      def handle_listener(listener_name, &listener)
+        case listener_name.to_s.downcase
+        when 'command', 'change'
+          command(&listener)
+        else
+          super
+        end
+      end
+      
+    end
+  end
+end

data/lib/glimmer/tk/widget_proxy.rb

@@ -369,6 +369,12 @@ module Glimmer
               setter: {name: 'text=', invoker: lambda { |widget, args| @tk.textvariable&.value = args.first }},
             },
           },
+          ::Tk::Tile::TScale => {
+            'variable' => {
+              getter: {name: 'variable', invoker: lambda { |widget, args| @tk.variable&.value }},
+              setter: {name: 'variable=', invoker: lambda { |widget, args| @tk.variable&.value = args.first }},
+            },
+          },
           ::Tk::Root => {
             'text' => {
               getter: {name: 'text', invoker: lambda { |widget, args| @tk.title }},
@@ -428,6 +434,13 @@ module Glimmer
               }
             end,
           },
+          ::Tk::Tile::TScale => {
+            'variable' => lambda do |observer|
+              @tk.command {
+                observer.call(@tk.variable&.value)
+              }
+            end,
+          },
           ::Tk::Text => {
             'value' => lambda do |observer|
               handle_listener('modified') do

data/samples/hello/hello_progressbar.rb

@@ -0,0 +1,118 @@
+# Copyright (c) 2020-2022 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-dsl-tk'
+
+class HelloProgressbar
+  include Glimmer
+  
+  attr_accessor :progress_value, :maximum_value, :delay_value
+  
+  def initialize
+    self.progress_value = 0
+    self.maximum_value = 100
+    self.delay_value = 0.01
+    
+    Thread.new do
+      loop do
+        self.progress_value = (self.progress_value.to_i + 1) % (maximum_value.to_i + 1)
+        sleep(delay_value) # yields to main thread
+      end
+    end
+  end
+  
+  def launch
+    root {
+      text 'Hello, Progressbar!'
+      
+      progressbar {
+        grid row: 0, column: 0, columnspan: 3
+        orient 'horizontal'
+        length 200
+        mode 'indeterminate'
+        maximum <= [self, :maximum_value]
+        value <= [self, :progress_value]
+      }
+      
+      label {
+        grid row: 1, column: 0
+        text 'Value'
+      }
+      
+      label {
+        grid row: 1, column: 1
+        text 'Maximum'
+      }
+      
+      label {
+        grid row: 1, column: 2
+        text 'Delay in Seconds'
+      }
+      
+      spinbox {
+        grid row: 2, column: 0
+        from 0.0
+        to 100.0
+        increment 1.0
+        format '%0f'
+        text <=> [self, :progress_value, on_read: :to_i, on_write: :to_i]
+      }
+      
+      spinbox {
+        grid row: 2, column: 1
+        from 1.0
+        to 100.0
+        increment 1.0
+        format '%0f'
+        text <=> [self, :maximum_value, on_read: :to_i, on_write: :to_i]
+      }
+      
+      spinbox {
+        grid row: 2, column: 2
+        from 0.01
+        to 1.0
+        increment 0.1
+        format '%0.2f'
+        text <=> [self, :delay_value, on_write: ->(val) {[val.to_f, 1.0].min}]
+      }
+      
+      progressbar {
+        grid row: 3, column: 0, columnspan: 3
+        orient 'horizontal'
+        length 200
+        mode 'determinate'
+        maximum <= [self, :maximum_value]
+        value <= [self, :progress_value]
+      }
+      
+      progressbar {
+        grid row: 4, column: 0, columnspan: 3
+        orient 'vertical'
+        length 200
+        mode 'determinate'
+        maximum <= [self, :maximum_value]
+        value <= [self, :progress_value]
+      }
+    }.open
+  end
+end
+
+HelloProgressbar.new.launch

data/samples/hello/hello_scale.rb

@@ -0,0 +1,53 @@
+# Copyright (c) 2020-2022 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-dsl-tk'
+
+class HelloScale
+  include Glimmer
+  
+  attr_accessor :scale_value
+  
+  def initialize
+    self.scale_value = 50
+  end
+  
+  def launch
+    root {
+      text 'Hello, Scale!'
+      
+      label {
+        anchor 'center'
+        text <= [self, :scale_value]
+      }
+      
+      scale {
+        orient 'horizontal' # can be 'vertical' too
+        length 200
+        from 0.0
+        to 100.0
+        variable <=> [self, :scale_value, on_write: :to_i]
+      }
+    }.open
+  end
+end
+
+HelloScale.new.launch

data/samples/hello/hello_theme.rb

@@ -0,0 +1,113 @@
+# Copyright (c) 2020-2022 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-dsl-tk'
+
+class HelloTheme
+  include Glimmer
+  
+  def launch
+    root {
+      title 'Hello, Theme!'
+      
+      labelframe {
+        text 'Theme'
+        
+        combobox { |cb|
+          readonly true
+          values ::Tk::Tile::Style.theme_names
+          text 'aqua'
+          
+          on('<ComboboxSelected>') do
+            ::Tk::Tile::Style.theme_use cb.tk.textvariable.value
+          end
+        }
+      }
+      
+      labelframe {
+        text 'Widgets'
+        
+        notebook {
+          frame(text: 'One') {
+            label {
+              text 'label'
+            }
+            
+            entry {
+              text 'entry'
+            }
+            
+            entry {
+              text 'password'
+              show '*'
+            }
+            
+            spinbox {
+              text '100'
+            }
+          }
+        
+          frame(text: 'Two') {
+            button {
+              text 'button'
+            }
+            
+            checkbutton {
+              text 'checkbutton'
+            }
+            
+            radiobutton {
+              text 'radiobutton'
+            }
+          }
+        
+          frame(text: 'Three') {
+            scale {
+              orient 'horizontal'
+              length 200
+              from 0.0
+              to 100.0
+              value 50
+            }
+            
+            progressbar {
+              orient 'horizontal'
+              length 200
+              mode 'determinate'
+              maximum 100
+              value 50
+            }
+            
+            progressbar {
+              orient 'vertical'
+              length 100
+              mode 'determinate'
+              maximum 100
+              value 50
+            }
+          }
+        }
+      }
+    }.open
+  end
+end
+
+HelloTheme.new.launch

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: glimmer-dsl-tk
 version: !ruby/object:Gem::Version
-  version: 0.0.54
+  version: 0.0.57
 platform: ruby
 authors:
 - AndyMaleh
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2022-02-20 00:00:00.000000000 Z
+date: 2022-03-28 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: glimmer
@@ -16,14 +16,14 @@ dependencies:
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: 2.6.0
+        version: 2.7.3
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: 2.6.0
+        version: 2.7.3
 - !ruby/object:Gem::Dependency
   name: puts_debuggerer
   requirement: !ruby/object:Gem::Requirement
@@ -222,6 +222,7 @@ files:
 - lib/glimmer/tk/os.rb
 - lib/glimmer/tk/radiobutton_proxy.rb
 - lib/glimmer/tk/root_proxy.rb
+- lib/glimmer/tk/scale_proxy.rb
 - lib/glimmer/tk/scrollbar_frame_proxy.rb
 - lib/glimmer/tk/spinbox_proxy.rb
 - lib/glimmer/tk/text_proxy.rb
@@ -249,13 +250,16 @@ files:
 - samples/hello/hello_menu_bar.rb
 - samples/hello/hello_message_box.rb
 - samples/hello/hello_notebook.rb
+- samples/hello/hello_progressbar.rb
 - samples/hello/hello_radiobutton.rb
 - samples/hello/hello_root.rb
+- samples/hello/hello_scale.rb
 - samples/hello/hello_scrollbar.rb
 - samples/hello/hello_scrollbar_frame.rb
 - samples/hello/hello_separator.rb
 - samples/hello/hello_spinbox.rb
 - samples/hello/hello_text.rb
+- samples/hello/hello_theme.rb
 - samples/hello/hello_toplevel.rb
 - samples/hello/hello_world.rb
 - samples/hello/images/align-center.png