glimmer-dsl-tk 0.0.55 → 0.0.58

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: c60d4ed3e0d36df11f12decc435cc03357dfb96ec95720e7bb830b527a473f9f
-  data.tar.gz: 1d33536b8b2e2c5700c8d3c320b28afc7b4c6d9eb976ce8d210cae94d7b731d5
+  metadata.gz: cf96d61575c30434197c7edfe2bfb6e6fd9fb84c70c18c0e924d688418351315
+  data.tar.gz: eaa003fd150d7fac2e85196e477714ea7df87d7a4651e44c0a909b8c566085c3
 SHA512:
-  metadata.gz: fc9fffd9cfdc6f75b57bcec0bb2851efe21fbfc6b46376db9350f552e29930c0f452c84654aa74a2fe4cd06e757a5470be265f533479e0a37feb8795ce473d52
-  data.tar.gz: 8425516afcb5698463cd23ee20b34570772bf084b29f393a8cc12302f3c3cde95c9d90671d06d4e9be7f5ae953a8d582d8c6d183d2ae55f3d1d09ea5470d320e
+  metadata.gz: 9451fadd605400721e4fd02a601e2720a2e4a41daa28aa0fa69b32f43ae1334de5ecde54ed2cd7d0f13bebdcdfe666daa4391c585fbea24302556eec8389f8af
+  data.tar.gz: c9e1ad3acd64c17b7642500ed7764c8f3be955de5a5a34d9cd482ac65a23aaba613396d6b14cfaddcd1537d63df6c3e810e723cd48c46bbcb318b00e4b5bc1ed

data/CHANGELOG.md

@@ -1,13 +1,28 @@
 # Change Log
 
+## 0.0.58
+
+- Support `@tk.textvariable.trace('write')` kind of variable tracing via `on_var(trace_operation) {}` listeners (e.g. `on_textvariable('write') {}`)
+- Use `on_textvariable` in `samples/hello/hello_entry.rb`
+- Improve validation text in `samples/hello/hello_entry.rb` to say "... not a valid phone!"
+
+## 0.0.57
+
+- Hello, Theme! sample
+
+## 0.0.56
+
+- Hello, Progressbar! sample
+- Upgrade to glimmer 2.7.3
+
 ## 0.0.55
 
-- Hello, Scale!
+- 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.55
-## 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.58
+## 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
@@ -134,6 +134,8 @@ DSL | Platforms | Native? | Vector Graphics? | Pros | Cons | Prereqs
     - [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)
@@ -193,7 +195,7 @@ gem install glimmer-dsl-tk
 
 Add the following to `Gemfile`:
 ```
-gem 'glimmer-dsl-tk', '0.0.55'
+gem 'glimmer-dsl-tk', '0.0.58'
 ```
 
 And, then run:
@@ -792,6 +794,28 @@ 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:
@@ -3973,6 +3997,265 @@ 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.55
+0.0.58

data/lib/glimmer/dsl/tk/dsl.rb

@@ -37,6 +37,7 @@ module Glimmer
         Tk,
         %w[
           list_selection_data_binding
+          variable_listener
           data_binding
           attribute
           shine_data_binding

data/lib/glimmer/dsl/tk/variable_listener_expression.rb

@@ -0,0 +1,41 @@
+# 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/expression'
+require 'glimmer/tk/widget_proxy'
+
+module Glimmer
+  module DSL
+    module Tk
+      class VariableListenerExpression < Expression
+        def can_interpret?(parent, keyword, *args, &block)
+          parent.is_a?(Glimmer::Tk::WidgetProxy) && keyword.match(/^on_.*/) && textual?(args.first)
+        end
+  
+        def interpret(parent, keyword, *args, &block)
+          variable_name = keyword.sub(/^on_/, '')
+          operation = args.first.to_s
+          parent.tk.send(variable_name).trace(operation, &block)
+        end
+      end
+    end
+  end
+end

data/samples/hello/hello_entry.rb

@@ -36,12 +36,13 @@ class HelloEntry
   def launch
     root {
       title 'Hello, Entry!'
-      
+      minsize 230, 0
+         
       label {
         grid sticky: 'ew'
         text 'default entry'
       }
-      entry {
+      entry { |the_entry|
         grid sticky: 'ew'
         text <=> [self, :default]
       }
@@ -60,7 +61,7 @@ class HelloEntry
         grid sticky: 'ew'
         text 'entry with event handlers'
       }
-      entry {
+      entry { |the_entry|
         grid sticky: 'ew'
         text <=> [self, :telephone]
         validate 'key'
@@ -72,7 +73,7 @@ class HelloEntry
 
         ## this event kicks in just after the text variable is validated and before it is modified
         on('invalid') do |validate_args|
-          @validated_entry_label.text = "#{validate_args.value} is not valid!"
+          @validated_entry_label.text = "#{validate_args.value} is not a valid phone!"
           @validated_entry_label.foreground = 'red'
         end
 
@@ -82,6 +83,13 @@ class HelloEntry
           @validated_entry_label.text = 'entry with event handlers'
           @validated_entry_label.foreground = nil
         end
+        
+        ## this is similar to on('change') (which is Glimmer-specific), but more low level at the Tk level
+        ## it is the equivalent of calling: the_entry.tk.textvariable.trace('write') { puts "..." }
+        ## More at: https://tkdocs.com/tutorial/widgets.html#entry and https://tcl.tk/man/tcl8.6/TclCmd/trace.htm#M14
+        on_textvariable('write') do
+          puts "\"#{the_entry.text}\" has been written to entry!"
+        end
       }
 
       label {

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

@@ -44,7 +44,7 @@ class HelloScale
         length 200
         from 0.0
         to 100.0
-        variable <=> [self, :scale_value, on_write: ->(val) {val.to_i}]
+        variable <=> [self, :scale_value, on_write: :to_i]
       }
     }.open
   end

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.55
+  version: 0.0.58
 platform: ruby
 authors:
 - AndyMaleh
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2022-02-20 00:00:00.000000000 Z
+date: 2022-05-07 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
@@ -205,6 +205,7 @@ files:
 - lib/glimmer/dsl/tk/on_expression.rb
 - lib/glimmer/dsl/tk/root_expression.rb
 - lib/glimmer/dsl/tk/shine_data_binding_expression.rb
+- lib/glimmer/dsl/tk/variable_listener_expression.rb
 - lib/glimmer/dsl/tk/widget_expression.rb
 - lib/glimmer/tk/checkbutton_proxy.rb
 - lib/glimmer/tk/combobox_proxy.rb
@@ -250,6 +251,7 @@ 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
@@ -258,6 +260,7 @@ files:
 - 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