glimmer-dsl-tk 0.0.53 → 0.0.56

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 4bc998830956c028c331da19e9238e69fe15198a0c2741af217cd15cae8fceb8
-  data.tar.gz: '040971d080dae49ebcb201631802566bcb415ddcd72ca623d6cca350c4587058'
+  metadata.gz: 951b8e62423c7092e9d3d34c25ea583cab0e5195b84f2553a47f36bcce2703c3
+  data.tar.gz: 35017367771d0668aa955d0edc9776fb5d5072ffdd1b63519f920d1edc73b70f
 SHA512:
-  metadata.gz: a573287857c8f89fb58226dc6c8f1c1629f5a7f7c2dac59952e3459738ba582b89539cc1365a8ebe0134d0c132e62757677fb438480a20b93f25c346846b20f8
-  data.tar.gz: 404e13705e7354d5e0bb2ae15993c7b17d09e77cb7161e111ab5dc908bbe18523501dffc041ff7ce69a71fb70db8d1cca8ef306fbab26f9d07faa2e5933eca53
+  metadata.gz: 78bd1d1296b43903d306daa043cbaa21f4b898703c43021387c32ed4e96019ebcff3690ac2a6e70e810ea7ccc70181df3ccefb5412e9fcebaecd9c762f14c511
+  data.tar.gz: 3aa1e66860f386a919a63c141023d20baba0e7aaff885560d9433a817baa9e930eed812242f2a203775254eabbb4f50fb29ab905f40223a0697c7600c58c9e02

data/CHANGELOG.md

@@ -1,5 +1,20 @@
 # Change Log
 
+## 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! sample
+- Add default padding to `labelframe`
+
 ## 0.0.53
 
 - Support menu item accelerators that include or end with function keys (e.g. `'Alt+F4'`)

data/README.md

@@ -1,13 +1,11 @@
-# [<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.53
-## 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.56
+## 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)
 [![Maintainability](https://api.codeclimate.com/v1/badges/ce2853efdbecf6ebdc73/maintainability)](https://codeclimate.com/github/AndyObtiva/glimmer-dsl-tk/maintainability)
 [![Join the chat at https://gitter.im/AndyObtiva/glimmer](https://badges.gitter.im/AndyObtiva/glimmer.svg)](https://gitter.im/AndyObtiva/glimmer?utm_source=badge&utm_medium=badge&utm_campaign=pr-badge&utm_content=badge)
 
-**[Contributors Wanted! (Submit a Glimmer App Sample to Get Started)](CONTRIBUTING.md)**
-
 [Glimmer](https://github.com/AndyObtiva/glimmer) DSL for [Tk](https://www.tcl.tk/) enables desktop development with [Glimmer](https://github.com/AndyObtiva/glimmer) in [Ruby](https://github.com/ruby/ruby).
 
 [Tcl/Tk](https://www.tcl.tk/) has recently improved by gaining native looking themed widgets on Mac, Windows, and Linux in [Tk version 8.5](https://www.tcl.tk/software/tcltk/8.5.html#:~:text=Highlights%20of%20Tk%208.5&text=Font%20rendering%3A%20Now%20uses%20anti,and%20window%20layout%2C%20and%20more.). Additionally, [Ruby](https://www.ruby-lang.org/en/) 3.0 Ractor (formerly known as [Guilds](https://olivierlacan.com/posts/concurrency-in-ruby-3-with-guilds/)) supports truly parallel multi-threading, making both [MRI](https://github.com/ruby/ruby) and [Tk](https://www.tcl.tk/) finally viable for support in [Glimmer](https://github.com/AndyObtiva/glimmer) (Ruby Desktop Development GUI Library) as an alternative to [JRuby on SWT](https://github.com/AndyObtiva/glimmer-dsl-swt).
@@ -53,13 +51,19 @@ Glimmer app:
 
 NOTE: Glimmer DSL for Tk is currently in early alpha mode (only about 44% complete). If you want it developed faster, then [open an issue report](https://github.com/AndyObtiva/glimmer-dsl-tk/issues/new). I have completed some features much faster before due to [issue reports](https://github.com/AndyObtiva/glimmer-dsl-tk/issues) and [pull requests](https://github.com/AndyObtiva/glimmer-dsl-tk/pulls). Please help make better by contributing, adopting for small or low risk projects, and providing feedback. It is still an early alpha, so the more feedback and issues you report the better.
 
-Other [Glimmer](https://github.com/AndyObtiva/glimmer) DSL gems you might be interested in:
-- [glimmer-dsl-swt](https://github.com/AndyObtiva/glimmer-dsl-swt): Glimmer DSL for SWT (JRuby Desktop Development GUI Framework)
-- [glimmer-dsl-opal](https://github.com/AndyObtiva/glimmer-dsl-opal): Glimmer DSL for Opal (Pure Ruby Web GUI and Auto-Webifier of Desktop Apps)
-- [glimmer-dsl-libui](https://github.com/AndyObtiva/glimmer-dsl-libui): Glimmer DSL for LibUI (Prerequisite-Free Ruby Desktop Development GUI Library)
-- [glimmer-dsl-gtk](https://github.com/AndyObtiva/glimmer-dsl-gtk): Glimmer DSL for GTK (Ruby-GNOME Desktop Development GUI Library)
-- [glimmer-dsl-xml](https://github.com/AndyObtiva/glimmer-dsl-xml): Glimmer DSL for XML (& HTML)
-- [glimmer-dsl-css](https://github.com/AndyObtiva/glimmer-dsl-css): Glimmer DSL for CSS (Cascading Style Sheets)
+**[Glimmer](https://rubygems.org/gems/glimmer) DSL Comparison Table:**
+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 (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
+[Glimmer DSL for Swing (JRuby Swing Desktop Development GUI Library)](https://github.com/AndyObtiva/glimmer-dsl-swing) | Mac / Windows / Linux | No | Yes (Java2D) | Very Mature | Slow JRuby Startup Time / Heavy Memory Footprint / Widgets Do Not Look Native | Java / JRuby
+[Glimmer DSL for XML (& HTML)](https://github.com/AndyObtiva/glimmer-dsl-xml) | All Web Browsers | No | Yes (SVG) | Programmable / Lighter-weight Than Actual XML | XML Elements Are Sometimes Not Well-Named (Many Types of Input) | None
+[Glimmer DSL for CSS](https://github.com/AndyObtiva/glimmer-dsl-css) | All Web Browsers | No | Yes | Programmable | CSS Is Over-Engineered / Too Many Features To Learn | None
 
 ## Table of Contents
 
@@ -96,6 +100,7 @@ Other [Glimmer](https://github.com/AndyObtiva/glimmer) DSL gems you might be int
     - [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)
@@ -127,6 +132,9 @@ Other [Glimmer](https://github.com/AndyObtiva/glimmer) DSL gems you might be int
     - [Hello, Scrollbar Frame!](#hello-scrollbar-frame)
     - [Hello, Menu Bar!](#hello-menu-bar)
     - [Hello, Contextual Menu!](#hello-contextual-menu)
+    - [Hello, Labelframe!](#hello-labelframe)
+    - [Hello, Scale!](#hello-scale)
+    - [Hello, Progressbar!](#hello-progressbar)
   - [Applications](#applications)
     - [Glimmer Tk Calculator](#glimmer-tk-calculator)
     - [Y3network Ruby UI](#y3network-ruby-ui)
@@ -186,7 +194,7 @@ gem install glimmer-dsl-tk
 
 Add the following to `Gemfile`:
 ```
-gem 'glimmer-dsl-tk', '0.0.53'
+gem 'glimmer-dsl-tk', '0.0.56'
 ```
 
 And, then run:
@@ -763,6 +771,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:
@@ -3726,6 +3778,346 @@ Glimmer app:
 
 ![glimmer dsl tk screenshot sample hello contextual-menu](images/glimmer-dsl-tk-screenshot-sample-hello-contextual-menu.png)
 
+### Hello, Labelframe!
+
+Glimmer code (from [samples/hello/hello_labelframe.rb](samples/hello/hello_labelframe.rb)):
+
+```ruby
+require 'glimmer-dsl-tk'
+
+include Glimmer
+
+root {
+  title 'Hello, Labelframe!'
+  
+  labelframe {
+    grid column: 0, row: 0, padx: 10, pady: 10
+    text 'Name:'
+    # labelanchor 'nw' # Default. Other options: 'n', 'ne', 'en', 'e', 'es', 'se', 's', 'sw', 'ws', 'w', 'wn'
+    
+    label {
+      grid column: 0, row: 0, sticky: 'w'
+      text 'First Name:'
+    }
+    entry {
+      grid column: 1, row: 0
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 1, sticky: 'w'
+      text 'Last Name:'
+    }
+    entry {
+      grid column: 1, row: 1
+      width 15
+    }
+  }
+  
+  labelframe {
+    grid column: 0, row: 1, padx: 10, pady: 10
+    text 'Address:'
+    
+    label {
+      grid column: 0, row: 0, sticky: 'w'
+      text 'Street:'
+    }
+    entry {
+      grid column: 1, row: 0
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 1, sticky: 'w'
+      text 'City:'
+    }
+    entry {
+      grid column: 1, row: 1
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 2, sticky: 'w'
+      text 'State:'
+    }
+    entry {
+      grid column: 1, row: 2
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 3, sticky: 'w'
+      text 'Zip:'
+    }
+    entry {
+      grid column: 1, row: 3
+      width 15
+    }
+  }
+  
+  labelframe {
+    grid column: 1, row: 0, rowspan: 2, padx: 10, pady: 10
+    text 'Medical Info:'
+    
+    label {
+      grid column: 0, row: 0, sticky: 'w'
+      text 'Family Doctor:'
+    }
+    entry {
+      grid column: 1, row: 0
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 1, sticky: 'w'
+      text 'Chronic Conditions:'
+    }
+    entry {
+      grid column: 1, row: 1
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 2, sticky: 'w'
+      text 'Past Surgeries:'
+    }
+    entry {
+      grid column: 1, row: 2
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 3, sticky: 'w'
+      text 'Health Insurance Info:'
+    }
+    entry {
+      grid column: 1, row: 3
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 4, sticky: 'w'
+      text 'Dental Insurance Info:'
+    }
+    entry {
+      grid column: 1, row: 4
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 5, sticky: 'w'
+      text 'Diet:'
+    }
+    entry {
+      grid column: 1, row: 5
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 6, sticky: 'w'
+      text 'Exercise:'
+    }
+    entry {
+      grid column: 1, row: 6
+      width 15
+    }
+  }
+}.open
+```
+
+Run with [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed:
+
+```
+ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_labelframe'"
+```
+
+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_labelframe.rb
+```
+
+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)
+
 ## Applications
 
 ### Glimmer Tk Calculator

data/VERSION

@@ -1 +1 @@
-0.0.53
+0.0.56

data/lib/glimmer/tk/labelframe_proxy.rb

@@ -0,0 +1,39 @@
+# 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/notebook_proxy'
+
+module Glimmer
+  module Tk
+    # Proxy for Tk::Tile::Labelframe
+    #
+    # Follows the Proxy Design Pattern
+    class LabelframeProxy < WidgetProxy
+      private
+      
+      def initialize_defaults
+        super
+        self.padding = 15
+      end
+    end
+  end
+end

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_labelframe.rb

@@ -0,0 +1,161 @@
+# 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'
+
+include Glimmer
+
+root {
+  title 'Hello, Labelframe!'
+  
+  labelframe {
+    grid column: 0, row: 0, padx: 10, pady: 10
+    text 'Name:'
+    # labelanchor 'nw' # Default. Other options: 'n', 'ne', 'en', 'e', 'es', 'se', 's', 'sw', 'ws', 'w', 'wn'
+    
+    label {
+      grid column: 0, row: 0, sticky: 'w'
+      text 'First Name:'
+    }
+    entry {
+      grid column: 1, row: 0
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 1, sticky: 'w'
+      text 'Last Name:'
+    }
+    entry {
+      grid column: 1, row: 1
+      width 15
+    }
+  }
+  
+  labelframe {
+    grid column: 0, row: 1, padx: 10, pady: 10
+    text 'Address:'
+    
+    label {
+      grid column: 0, row: 0, sticky: 'w'
+      text 'Street:'
+    }
+    entry {
+      grid column: 1, row: 0
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 1, sticky: 'w'
+      text 'City:'
+    }
+    entry {
+      grid column: 1, row: 1
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 2, sticky: 'w'
+      text 'State:'
+    }
+    entry {
+      grid column: 1, row: 2
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 3, sticky: 'w'
+      text 'Zip:'
+    }
+    entry {
+      grid column: 1, row: 3
+      width 15
+    }
+  }
+  
+  labelframe {
+    grid column: 1, row: 0, rowspan: 2, padx: 10, pady: 10
+    text 'Medical Info:'
+    
+    label {
+      grid column: 0, row: 0, sticky: 'w'
+      text 'Family Doctor:'
+    }
+    entry {
+      grid column: 1, row: 0
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 1, sticky: 'w'
+      text 'Chronic Conditions:'
+    }
+    entry {
+      grid column: 1, row: 1
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 2, sticky: 'w'
+      text 'Past Surgeries:'
+    }
+    entry {
+      grid column: 1, row: 2
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 3, sticky: 'w'
+      text 'Health Insurance Info:'
+    }
+    entry {
+      grid column: 1, row: 3
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 4, sticky: 'w'
+      text 'Dental Insurance Info:'
+    }
+    entry {
+      grid column: 1, row: 4
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 5, sticky: 'w'
+      text 'Diet:'
+    }
+    entry {
+      grid column: 1, row: 5
+      width 15
+    }
+    
+    label {
+      grid column: 0, row: 6, sticky: 'w'
+      text 'Exercise:'
+    }
+    entry {
+      grid column: 1, row: 6
+      width 15
+    }
+  }
+}.open

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

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: glimmer-dsl-tk
 version: !ruby/object:Gem::Version
-  version: 0.0.53
+  version: 0.0.56
 platform: ruby
 authors:
 - AndyMaleh
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2022-01-22 00:00:00.000000000 Z
+date: 2022-03-26 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
@@ -213,6 +213,7 @@ files:
 - lib/glimmer/tk/entry_proxy.rb
 - lib/glimmer/tk/frame_proxy.rb
 - lib/glimmer/tk/label_proxy.rb
+- lib/glimmer/tk/labelframe_proxy.rb
 - lib/glimmer/tk/lbl_proxy.rb
 - lib/glimmer/tk/list_proxy.rb
 - lib/glimmer/tk/menu_item_proxy.rb
@@ -221,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
@@ -242,13 +244,16 @@ files:
 - samples/hello/hello_entry.rb
 - samples/hello/hello_frame.rb
 - samples/hello/hello_label.rb
+- samples/hello/hello_labelframe.rb
 - samples/hello/hello_list_multi_selection.rb
 - samples/hello/hello_list_single_selection.rb
 - 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