glimmer-dsl-tk 0.0.23 → 0.0.24

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 9d722c9396a9adb7252e4fc65c283fbf923dbe0cb93e17a9d34649ea887f5e56
-  data.tar.gz: 20682a6aa497800f683b87fc180754a58a96362a5a286fab3754bc38edd5d084
+  metadata.gz: 406613fff26324b7f91ddbaea11f01f90241b883f99a7732beb27a097eaae24d
+  data.tar.gz: d2e0828831b9cb7a6b017be648253972ad1cb8e8c48fa20046e6a3bd4b0b59f5
 SHA512:
-  metadata.gz: 77c488d614a997861369fd032fc1ebc578bee01aa8367c0fd267b99442ec462769f0218c11e236533b3443558294c2ca0940c773777698f4216df85cd1179243
-  data.tar.gz: 521a5c5e3db695b7938fc225619779114e32c06fa2bce870de16f233597d212b3662218a101e95921733c58f4ea02764598167eaa507835bbb25855187566b6a
+  metadata.gz: 9ba903e6e9d4e611e7c7f17c94f902a6a33945e07ab46136c30003ad5189b707a6485ab4f7c472503699ead75119b20d237e9bda1484f32373354dc74ba8e90a
+  data.tar.gz: c4d5f2c7f8338e3fdfc0452e97d7f0498b7b2ded75a586272f11cfadc61b71ee6db197d2b76441d2c2f925914ff61e6577d8fef36c106426267bd7a23c3d3d5f

data/CHANGELOG.md

@@ -1,5 +1,13 @@
 # Change Log
 
+## 0.0.24
+
+- Hello, Entry!
+- Update `entry` data-binding logic to trace 'write' changes to `entry` `textvariable` as that is more correct than monitoring `validatecommand`
+- Support `entry` `validate`  (alias for `validatecommand`), `invalid` (alias for `invalidcommand`), and `change` event bindings
+- Support `entry` `show` and `validate` attributes
+- Support `grid` options `row_weight` (for row expansion), `column_weight` (for column expansion), `row_minsize` (alias: `min_height`), and `column_minsize` (alias: `min_width`)
+
 ## 0.0.23
 
 - Hello, Radiobutton!

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.23
+# [<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.24
 ## MRI Ruby 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)
@@ -105,6 +105,7 @@ Other [Glimmer](https://github.com/AndyObtiva/glimmer) DSL gems:
     - [Hello, Combobox!](#hello-combobox)
     - [Hello, List Single Selection!](#hello-list-single-selection)
     - [Hello, List Multi Selection!](#hello-list-multi-selection)
+    - [Hello, Entry!](#hello-entry)
     - [Hello, Computed!](#hello-computed)
   - [Help](#help)
     - [Issues](#issues)
@@ -142,7 +143,7 @@ gem install glimmer-dsl-tk
 
 Add the following to `Gemfile`:
 ```
-gem 'glimmer-dsl-tk', '~> 0.0.23'
+gem 'glimmer-dsl-tk', '~> 0.0.24'
 ```
 
 And, then run:
@@ -254,7 +255,7 @@ keyword(args) | attributes | event bindings & callbacks
 `button` | `text`, `image` (optional keyword args: `subsample`, `zoom`, `from`, `to`, `shrink`, `compositingrule`), `compound` (`'center', 'top', 'bottom', 'left', 'right'`), `default` (`'active', 'normal'`) | `command {}`
 `checkbutton` | `text`, `variable` (Boolean), `image` (optional keyword args: `subsample`, `zoom`, `from`, `to`, `shrink`, `compositingrule`), `compound` (`'center', 'top', 'bottom', 'left', 'right'`), `onvalue` (default: `1`), `offvalue` (default: `0`) | `command {}`
 `combobox` | `state`, `text` | `'ComboboxSelected'`
-`entry` | `width`, `text` | None
+`entry` | `width`, `text`, `validate`, `show` (`'none', 'focus', 'focusin', 'focusout', 'key', or 'all'`) | `'validate'`, `'invalid'`, `'change'`, `validatecommand {}`, `invalidcommand {}`
 `frame(text: nil)` | `width`, `height`, `borderwidth`, `relief` (`'flat' (default), 'raised', 'sunken', 'solid', 'ridge', 'groove'`) | None
 `label` | `text`, `image` (optional keyword args: `subsample`, `zoom`, `from`, `to`, `shrink`, `compositingrule`), `compound` (`'center', 'top', 'bottom', 'left', 'right'`), `font` (`'default', 'text', 'fixed', 'menu', 'heading', 'caption', 'small_caption', 'icon', 'tooltip'`), `relief` (`'flat' (default), 'raised', 'sunken', 'solid', 'ridge', 'groove'`), `justify` (`'left', 'center', 'right'`), `foreground`, `background` | None
 `list` | `selectmode`, `selection` | None
@@ -315,7 +316,7 @@ keyword(args) | attributes | event bindings & callbacks
 
 #### Event Bindings
 
-Any events that normally can be accepted by the Tk `bind` or `protocol` methods can be accepted by the `on(event) {}` listener syntax. There is no need to surround event name by `<>` as [Glimmer DSL for Tk](https://rubygems.org/gems/glimmer-dsl-tk) automatically takes care of that when needed and leaves out when not needed.
+Any events that normally can be accepted by the Tk `bind` or `protocol` methods can be accepted by the `on(event) {}` listener syntax. For actual (non-virtual) events, there is no need to surround event name by `<>` as [Glimmer DSL for Tk](https://rubygems.org/gems/glimmer-dsl-tk) automatically takes care of that when needed and leaves out when not needed.
 
 #### Grid Layout
 
@@ -474,7 +475,7 @@ That code binds the `textvariable` value of the `entry` to the `country` attribu
 
 It automatically handles all the Tk plumbing behind the scenes.
 
-More details can be found in the [Hello, Computed!](#hello-computed) sample below.
+More details can be found in [Hello, Entry!](#hello-entry) and [Hello, Computed!](#hello-computed) samples below.
 
 ### Checkbutton Data-Binding
 
@@ -573,7 +574,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_world'"
 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_world.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_world.rb
 ```
 
 Glimmer app:
@@ -672,7 +673,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_button'"
 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_button.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_button.rb
 ```
 
 Glimmer app:
@@ -805,7 +806,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_checkbutton'"
 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_checkbutton.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_checkbutton.rb
 ```
 
 Glimmer app:
@@ -919,7 +920,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_radiobutton'"
 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_radiobutton.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_radiobutton.rb
 ```
 
 Glimmer app:
@@ -992,7 +993,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_frame'"
 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_frame.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_frame.rb
 ```
 
 Glimmer app:
@@ -1042,7 +1043,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_root'"
 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_root.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_root.rb
 ```
 
 Glimmer app:
@@ -1096,7 +1097,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_notebook'"
 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_notebook.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_notebook.rb
 ```
 
 Glimmer app:
@@ -1209,7 +1210,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_label'"
 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_label.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_label.rb
 ```
 
 Glimmer app:
@@ -1311,7 +1312,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_message_box'"
 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_message_box.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_message_box.rb
 ```
 
 Glimmer app:
@@ -1352,7 +1353,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_combobox'"
 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_combobox.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_combobox.rb
 ```
 
 Glimmer app:
@@ -1392,7 +1393,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_list_single_selection'"
 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_list_single_selection.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_list_single_selection.rb
 ```
 
 Glimmer app:
@@ -1430,7 +1431,7 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_list_multi_selection'"
 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_list_multi_selection.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_list_multi_selection.rb
 ```
 
 Glimmer app:
@@ -1510,7 +1511,194 @@ ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_computed'"
 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_computed.rb
+ruby -r ./lib/glimmer-dsl-tk.rb samples/hello/hello_computed.rb
+```
+
+Glimmer app:
+
+![glimmer dsl tk screenshot sample hello computed](images/glimmer-dsl-tk-screenshot-sample-hello-computed.png)
+
+### Hello, Entry!
+
+Glimmer code (from [samples/hello/hello_entry.rb](samples/hello/hello_entry.rb)):
+
+```ruby
+require 'glimmer-dsl-tk'
+
+class HelloEntry
+  include Glimmer
+  
+  attr_accessor :default, :password, :telephone, :read_only
+  
+  def initialize
+    self.default = 'default'
+    self.password = 'password'
+    self.telephone = '555-555-5555'
+    self.read_only = 'Telephone area code is 555'
+  end
+  
+  def launch
+    root {
+      title 'Hello, Entry!'
+      
+      label {
+        grid sticky: 'ew', column_weight: 1
+        text 'default entry'
+      }
+      entry {
+        grid sticky: 'ew'
+        text <=> [self, :default]
+      }
+      
+      label {
+        grid sticky: 'ew'
+        text 'password entry'
+      }
+      entry {
+        grid sticky: 'ew'
+        show '*'
+        text <=> [self, :password]
+      }
+
+      @validated_entry_label = label {
+        grid sticky: 'ew'
+        text 'entry with event handlers'
+      }
+      entry {
+        grid sticky: 'ew'
+        text <=> [self, :telephone]
+        validate 'key'
+
+        ## 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)
+        end
+
+        ## 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.foreground = 'red'
+        end
+
+        ## this event kicks in just after the text variable is validated and modified
+        on('change') do |new_text_variable|
+          self.read_only = "Telephone area code is #{new_text_variable.value.gsub(/[^0-9]/, '')[0...3]}"
+          @validated_entry_label.text = 'entry with event handlers'
+          @validated_entry_label.foreground = nil
+        end
+      }
+
+      label {
+        grid sticky: 'ew'
+        text 'read-only entry'
+      }
+      entry {
+        grid sticky: 'ew'
+        text <=> [self, :read_only]
+        readonly true
+      }
+    }.open
+  end
+  
+  def telephone?(text)
+    !!text.match(/^\d{0,3}[-.\/]?\d{0,3}[-.\/]?\d{0,4}$/)
+  end
+end
+
+HelloEntry.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_entry'"
+```
+
+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_entry.rb
+```
+
+Glimmer app:
+
+![glimmer dsl tk screenshot sample hello entry](images/glimmer-dsl-tk-screenshot-sample-hello-entry.png)
+![glimmer dsl tk screenshot sample hello entry validated](images/glimmer-dsl-tk-screenshot-sample-hello-entry-validated.png)
+
+### Hello, Computed!
+
+Glimmer code (from [samples/hello/hello_computed.rb](samples/hello/hello_computed.rb)):
+
+```ruby
+# ... more code precedes
+    root {
+      title 'Hello, Computed!'
+      
+      frame {
+        grid column: 0, row: 0, padx: 5, pady: 5
+        
+        label {
+          grid column: 0, row: 0, sticky: 'w'
+          text 'First Name: '
+        }
+        entry {
+          grid column: 1, row: 0
+          width 15
+          text <=> [@contact, :first_name]
+        }
+        
+        label {
+          grid column: 0, row: 1, sticky: 'w'
+          text 'Last Name: '
+        }
+        entry {
+          grid column: 1, row: 1
+          width 15
+          text <=> [@contact, :last_name]
+        }
+        
+        label {
+          grid column: 0, row: 2, sticky: 'w'
+          text 'Year of Birth: '
+        }
+        entry {
+          grid column: 1, row: 2
+          width 15
+          text <=> [@contact, :year_of_birth]
+        }
+        
+        label {
+          grid column: 0, row: 3, sticky: 'w'
+          text 'Name: '
+        }
+        label {
+          grid column: 1, row: 3, sticky: 'w'
+          text <=> [@contact, :name, computed_by: [:first_name, :last_name]]
+        }
+        
+        label {
+          grid column: 0, row: 4, sticky: 'w'
+          text 'Age: '
+        }
+        label {
+          grid column: 1, row: 4, sticky: 'w'
+          text <=> [@contact, :age, on_write: :to_i, computed_by: [:year_of_birth]]
+        }
+      }
+    }.open
+# ... more code follows
+```
+
+Run with [glimmer-dsl-tk](https://rubygems.org/gems/glimmer-dsl-tk) gem installed:
+
+```
+ruby -r glimmer-dsl-tk -e "require 'samples/hello/hello_computed'"
+```
+
+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_computed.rb
 ```
 
 Glimmer app:

data/VERSION

@@ -1 +1 @@
-0.0.23
+0.0.24

data/lib/glimmer/tk/entry_proxy.rb

@@ -33,9 +33,26 @@ module Glimmer
       def validatecommand_block=(proc)
         tk.validatecommand(proc)
       end
+      
       def invalidcommand_block=(proc)
         tk.invalidcommand(proc)
       end
+      
+      def handle_listener(listener_name, &listener)
+        case listener_name.to_s.downcase
+        when 'change'
+          tk.textvariable.trace('write') {
+            listener.call(@tk.textvariable)
+          }
+        when 'validatecommand', 'validate'
+          self.validatecommand_block = listener
+        when 'invalidcommand', 'invalid'
+          self.invalidcommand_block = listener
+        else
+          super
+        end
+      end
+      
     end
   end
 end

data/lib/glimmer/tk/widget_proxy.rb

@@ -149,7 +149,11 @@ module Glimmer
 
       def set_attribute(attribute, *args)
         widget_custom_attribute = widget_custom_attribute_mapping[tk.class] && widget_custom_attribute_mapping[tk.class][attribute.to_s]
-        if widget_custom_attribute
+        if respond_to?(attribute, super_only: true)
+          send(attribute, *args)
+        elsif respond_to?(attribute_setter(attribute), super_only: true)
+          send(attribute_setter(attribute), *args)
+        elsif widget_custom_attribute
           widget_custom_attribute[:setter][:invoker].call(@tk, args)
         elsif tk_widget_has_attribute_setter?(attribute)
           unless args.size == 1 && @tk.send(attribute) == args.first
@@ -197,6 +201,26 @@ module Glimmer
         "#{attribute}="
       end
       
+      def grid(options = {})
+        options = options.stringify_keys
+        index_in_parent = @parent_proxy.children.index(self)
+        options['rowweight'] = options.delete('row_weight') if options.keys.include?('row_weight')
+        options['columnweight'] = options.delete('column_weight') if options.keys.include?('column_weight')
+        options['columnweight'] = options['rowweight'] = options.delete('weight')  if options.keys.include?('weight')
+        options['rowminsize'] = options.delete('row_minsize') if options.keys.include?('row_minsize')
+        options['rowminsize'] = options.delete('minheight') if options.keys.include?('minheight')
+        options['rowminsize'] = options.delete('min_height') if options.keys.include?('min_height')
+        options['columnminsize'] = options.delete('column_minsize') if options.keys.include?('column_minsize')
+        options['columnminsize'] = options.delete('minwidth') if options.keys.include?('minwidth')
+        options['columnminsize'] = options.delete('min_width') if options.keys.include?('min_width')
+        options['columnminsize'] = options['rowminsize'] = options.delete('minsize')  if options.keys.include?('minsize')
+        TkGrid.rowconfigure(@parent_proxy.tk, index_in_parent, 'weight'=> options.delete('rowweight')) if options.keys.include?('rowweight')
+        TkGrid.rowconfigure(@parent_proxy.tk, index_in_parent, 'minsize'=> options.delete('rowminsize')) if options.keys.include?('rowminsize')
+        TkGrid.columnconfigure(@parent_proxy.tk, index_in_parent, 'weight'=> options.delete('columnweight')) if options.keys.include?('columnweight')
+        TkGrid.columnconfigure(@parent_proxy.tk, index_in_parent, 'minsize'=> options.delete('columnminsize')) if options.keys.include?('columnminsize')
+        @tk.grid(options)
+      end
+      
       def widget_custom_attribute_mapping
         # TODO consider extracting to modules/subclasses
         @widget_custom_attribute_mapping ||= {
@@ -249,7 +273,7 @@ module Glimmer
           ::Tk::Tile::TEntry => {
             'text' => {
               getter: {name: 'text', invoker: lambda { |widget, args| @tk.textvariable&.value }},
-              setter: {name: 'text=', invoker: lambda { |widget, args| @tk.textvariable&.value = args.first unless @text_variable_edit }},
+              setter: {name: 'text=', invoker: lambda { |widget, args| @tk.textvariable&.value = args.first }},
             },
           },
           ::Tk::Root => {
@@ -285,23 +309,14 @@ module Glimmer
           },
           ::Tk::Tile::TEntry => {
             'text' => lambda do |observer|
-              tk.validate = 'key'
-              tk.validatecommand { |new_tk_variable|
-                @text_variable_edit = new_tk_variable.value != @tk.textvariable.value
-                if @text_variable_edit
-                  observer.call(new_tk_variable.value)
-                  @text_variable_edit = nil
-                  true
-                else
-                  false
-                end
+              tk.textvariable.trace('write') {
+                observer.call(@tk.textvariable.value)
               }
             end,
           },
           ::Tk::Tile::TRadiobutton => {
             'variable' => lambda do |observer|
               @tk.command {
-                pd @tk.variable.value, @tk.value
                 observer.call(@tk.variable.value == @tk.value)
               }
             end,
@@ -361,15 +376,15 @@ module Glimmer
         super(method.to_sym, *args, &block)
       end
       
-      def respond_to?(method, *args, &block)
-        super ||
-          tk.respond_to?(method, *args, &block)
+      def respond_to?(method, *args, super_only: false, &block)
+        super(method, true) ||
+          !super_only && tk.respond_to?(method, *args, &block)
       end
       
       private
       
       def initialize_defaults
-        @tk.grid unless @tk.is_a?(::Tk::Toplevel)
+        grid unless @tk.is_a?(::Tk::Toplevel)
       end
     end
   end

data/lib/glimmer-dsl-tk.rb

@@ -28,6 +28,7 @@ require 'puts_debuggerer' if ENV['pd'].to_s.downcase == 'true'
 # require 'super_module'
 require 'tk'
 require 'os'
+require 'facets/hash/symbolize_keys'
 
 # Internal requires
 # require 'ext/glimmer/config'

data/samples/hello/hello_entry.rb

@@ -0,0 +1,104 @@
+# Copyright (c) 2020-2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+require 'glimmer-dsl-tk'
+
+class HelloEntry
+  include Glimmer
+  
+  attr_accessor :default, :password, :telephone, :read_only
+  
+  def initialize
+    self.default = 'default'
+    self.password = 'password'
+    self.telephone = '555-555-5555'
+    self.read_only = 'Telephone area code is 555'
+  end
+  
+  def launch
+    root {
+      title 'Hello, Entry!'
+      
+      label {
+        grid sticky: 'ew', column_weight: 1
+        text 'default entry'
+      }
+      entry {
+        grid sticky: 'ew'
+        text <=> [self, :default]
+      }
+      
+      label {
+        grid sticky: 'ew'
+        text 'password entry'
+      }
+      entry {
+        grid sticky: 'ew'
+        show '*'
+        text <=> [self, :password]
+      }
+
+      @validated_entry_label = label {
+        grid sticky: 'ew'
+        text 'entry with event handlers'
+      }
+      entry {
+        grid sticky: 'ew'
+        text <=> [self, :telephone]
+        validate 'key'
+
+        ## 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)
+        end
+
+        ## 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.foreground = 'red'
+        end
+
+        ## this event kicks in just after the text variable is validated and modified
+        on('change') do |new_text_variable|
+          self.read_only = "Telephone area code is #{new_text_variable.value.gsub(/[^0-9]/, '')[0...3]}"
+          @validated_entry_label.text = 'entry with event handlers'
+          @validated_entry_label.foreground = nil
+        end
+      }
+
+      label {
+        grid sticky: 'ew'
+        text 'read-only entry'
+      }
+      entry {
+        grid sticky: 'ew'
+        text <=> [self, :read_only]
+        readonly true
+      }
+    }.open
+  end
+  
+  def telephone?(text)
+    !!text.match(/^\d{0,3}[-.\/]?\d{0,3}[-.\/]?\d{0,4}$/)
+  end
+end
+
+HelloEntry.new.launch

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: glimmer-dsl-tk
 version: !ruby/object:Gem::Version
-  version: 0.0.23
+  version: 0.0.24
 platform: ruby
 authors:
 - AndyMaleh
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2021-10-13 00:00:00.000000000 Z
+date: 2021-10-15 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: glimmer
@@ -190,7 +190,8 @@ dependencies:
     - - "~>"
       - !ruby/object:Gem::Version
         version: 0.7.0
-description: Glimmer DSL for Tk (MRI Ruby Desktop Development GUI Library)
+description: Glimmer DSL for Tk (MRI Ruby Desktop Development GUI Library) - Ruby
+  DSL for Tcl/Tk with bidirectional/unidirectional data-binding support
 email: andy.am@gmail.com
 executables:
 - girb
@@ -242,6 +243,7 @@ files:
 - samples/hello/hello_combobox.rb
 - samples/hello/hello_computed.rb
 - samples/hello/hello_computed/contact.rb
+- samples/hello/hello_entry.rb
 - samples/hello/hello_frame.rb
 - samples/hello/hello_label.rb
 - samples/hello/hello_list_multi_selection.rb