glimmer-dsl-tk 0.0.56 → 0.0.59

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 951b8e62423c7092e9d3d34c25ea583cab0e5195b84f2553a47f36bcce2703c3
-  data.tar.gz: 35017367771d0668aa955d0edc9776fb5d5072ffdd1b63519f920d1edc73b70f
+  metadata.gz: 26c20e8d681d57d11f540136ad94fd26a4f7ab51a5663eba95599dd5fa1589fe
+  data.tar.gz: 6f70dd20a48487e0c73135790b24e38f8080fa376cda20f1da2c8db83cb78d4c
 SHA512:
-  metadata.gz: 78bd1d1296b43903d306daa043cbaa21f4b898703c43021387c32ed4e96019ebcff3690ac2a6e70e810ea7ccc70181df3ccefb5412e9fcebaecd9c762f14c511
-  data.tar.gz: 3aa1e66860f386a919a63c141023d20baba0e7aaff885560d9433a817baa9e930eed812242f2a203775254eabbb4f50fb29ab905f40223a0697c7600c58c9e02
+  metadata.gz: 97fc2a77f286aec0cef3f0733aa1642415a0cf5ae420ea7713344b4b9f0de676d96fbb40b6cdba8d5a3338f8340a6b94ef3e6497043b86cd154258d66e320616
+  data.tar.gz: d48746949f04d68643d6493cab85c04bc7951da0fcbced1c7f13ab9a968d3bab6e452b8c804b2b012ab6b662c8092e87c0bea4386a214b2ccd494a94e46b6299

data/CHANGELOG.md

@@ -1,5 +1,19 @@
 # Change Log
 
+## 0.0.59
+
+- Auto-Default to `validate 'key'` on an `entry` when defining `validatecommand {}`, `on('validate') {}`, `invalidcommand {}`, `on('invalid') {}`
+
+## 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

data/README.md

@@ -1,4 +1,4 @@
-# [<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
+# [<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.59
 ## 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)
@@ -135,6 +135,7 @@ DSL | Platforms | Native? | Vector Graphics? | Pros | Cons | Prereqs
     - [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)
@@ -194,7 +195,7 @@ gem install glimmer-dsl-tk
 
 Add the following to `Gemfile`:
 ```
-gem 'glimmer-dsl-tk', '0.0.56'
+gem 'glimmer-dsl-tk', '0.0.59'
 ```
 
 And, then run:
@@ -2180,12 +2181,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]
       }
@@ -2204,11 +2206,14 @@ class HelloEntry
         grid sticky: 'ew'
         text 'entry with event handlers'
       }
-      entry {
+      entry { |the_entry|
         grid sticky: 'ew'
         text <=> [self, :telephone]
-        validate 'key'
 
+        # validate 'key' # default when on('validate') or on('invalid') is specified
+        ## Validation happens on key change by default when validation listeners are specified
+        ## (other accepted values: 'none', 'focus', 'focusin', 'focusout', 'key', or 'all')
+        
         ## this event kicks in just after the user typed and before modifying the text variable
         on('validate') do |new_text_variable|
           telephone?(new_text_variable.value)
@@ -2216,7 +2221,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.string} is not valid!"
+          @validated_entry_label.text = "#{validate_args.value} is not a valid phone!"
           @validated_entry_label.foreground = 'red'
         end
 
@@ -2226,6 +2231,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 {
@@ -4118,6 +4130,143 @@ Glimmer app:
 
 ![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
@@ -4136,9 +4285,9 @@ https://github.com/ancorgs/y3network-ruby-ui
 
 This is a Graphical User Interface for the famous [cryptopunks Ruby gem](https://github.com/cryptopunksnotdead/cryptopunks/tree/master/cryptopunks).
 
-https://github.com/cryptopunksnotdead/cryptopunks-gui
+https://github.com/cryptopunksnotdead/cryptopunks/tree/master/cryptopunks-gui
 
-![CryptoPunks GUI Screenshot](https://raw.githubusercontent.com/cryptopunksnotdead/cryptopunks-gui/master/screenshots/cryptopunks-gui-screenshot.png)
+![CryptoPunks GUI Screenshot](https://raw.githubusercontent.com/cryptopunksnotdead/cryptopunks/master/cryptopunks-gui/screenshots/cryptopunks-gui-screenshot.png)
 
 ### Circule
 

data/VERSION

@@ -1 +1 @@
-0.0.56
+0.0.59

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/lib/glimmer/tk/entry_proxy.rb

@@ -31,13 +31,24 @@ module Glimmer
       include TextVariableOwner
     
       def validatecommand_block=(proc)
+        self.validate = 'key' unless validate
         tk.validatecommand(proc)
       end
       
       def invalidcommand_block=(proc)
+        self.validate = 'key' unless validate
         tk.invalidcommand(proc)
       end
       
+      def validate
+        @validate
+      end
+      
+      def validate=(value)
+        @validate = value
+        @tk.validate(value)
+      end
+      
       def handle_listener(listener_name, &listener)
         case listener_name.to_s.downcase
         when 'change', 'changed', 'modified'

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,11 +61,14 @@ class HelloEntry
         grid sticky: 'ew'
         text 'entry with event handlers'
       }
-      entry {
+      entry { |the_entry|
         grid sticky: 'ew'
         text <=> [self, :telephone]
-        validate 'key'
 
+        # validate 'key' # default when on('validate') or on('invalid') is specified
+        ## Validation happens on key change by default when validation listeners are specified
+        ## (other accepted values: 'none', 'focus', 'focusin', 'focusout', 'key', or 'all')
+        
         ## this event kicks in just after the user typed and before modifying the text variable
         on('validate') do |new_text_variable|
           telephone?(new_text_variable.value)
@@ -72,7 +76,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 +86,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_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.56
+  version: 0.0.59
 platform: ruby
 authors:
 - AndyMaleh
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2022-03-26 00:00:00.000000000 Z
+date: 2022-05-21 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: glimmer
@@ -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
@@ -259,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