glimmer-dsl-libui 0.4.0 → 0.4.4

data/VERSION

@@ -1 +1 @@
-0.4.0
+0.4.4

data/examples/basic_entry.rb

@@ -2,30 +2,33 @@
 
 require 'glimmer-dsl-libui'
 
-include Glimmer
-
-window('Basic Entry', 300, 50) {
-  horizontal_box {
-    e = entry {
-      # stretchy true # Smart default option for appending to horizontal_box
-    
-      on_changed do
-        puts e.text
-        $stdout.flush # For Windows
-      end
-    }
-    
-    button('Button') {
-      stretchy false # stretchy property is available when control is nested under horizontal_box
+class BasicEntry
+  include Glimmer
+  
+  attr_accessor :entry_text
+  
+  def launch
+    window('Basic Entry', 300, 50) {
+      horizontal_box {
+        entry {
+          # stretchy true # Smart default option for appending to horizontal_box
+          text <=> [self, :entry_text, after_write: ->(text) {puts text; $stdout.flush}] # bidirectional data-binding between text property and entry_text attribute, printing after write to model.
+        }
+        
+        button('Button') {
+          stretchy false # stretchy property is available when control is nested under horizontal_box
+          
+          on_clicked do
+            msg_box('You entered', entry_text)
+          end
+        }
+      }
       
-      on_clicked do
-        text = e.text
-        msg_box('You entered', text)
+      on_closing do
+        puts 'Bye Bye'
       end
-    }
-  }
-  
-  on_closing do
-    puts 'Bye Bye'
+    }.show
   end
-}.show
+end
+
+BasicEntry.new.launch

data/examples/basic_entry2.rb

@@ -0,0 +1,31 @@
+# frozen_string_literal: true
+
+require 'glimmer-dsl-libui'
+
+include Glimmer
+
+window('Basic Entry', 300, 50) {
+  horizontal_box {
+    e = entry {
+      # stretchy true # Smart default option for appending to horizontal_box
+    
+      on_changed do
+        puts e.text
+        $stdout.flush # For Windows
+      end
+    }
+    
+    button('Button') {
+      stretchy false # stretchy property is available when control is nested under horizontal_box
+      
+      on_clicked do
+        text = e.text
+        msg_box('You entered', text)
+      end
+    }
+  }
+  
+  on_closing do
+    puts 'Bye Bye'
+  end
+}.show

data/examples/button_counter.rb

@@ -0,0 +1,27 @@
+require 'glimmer-dsl-libui'
+
+class ButtonCounter
+  include Glimmer
+
+  attr_accessor :count
+
+  def initialize
+    @count = 0
+  end
+
+  def launch
+    window('Hello, Button!', 190, 20) {
+      vertical_box {
+        button {
+          text <= [self, :count, on_read: ->(count) {"Count: #{count}"}] # data-bind button text to self count, converting to string on read.
+          
+          on_clicked do
+            self.count += 1
+          end
+        }
+      }
+    }.show
+  end
+end
+
+ButtonCounter.new.launch

data/examples/color_the_circles.rb

@@ -26,7 +26,8 @@ class ColorTheCircles
   end
   
   def register_observers
-    observer = Glimmer::DataBinding::Observer.proc do |new_score|
+    # observe automatically enhances self to become Glimmer::DataBinding::ObservableModel and notify observer block of score attribute changes
+    observe(self, :score) do |new_score|
       Glimmer::LibUI.queue_main do
         @score_label.text = new_score.to_s
         if new_score == -20
@@ -40,7 +41,6 @@ class ColorTheCircles
         end
       end
     end
-    observer.observe(self, :score) # automatically enhances self to become Glimmer::DataBinding::ObservableModel and notify observer on score attribute changes
   end
   
   def setup_circle_factory

data/examples/form.rb

@@ -2,36 +2,48 @@
 
 require 'glimmer-dsl-libui'
 
-include Glimmer
-
-window('Form') {
-  margined true
+class Form
+  include Glimmer
   
-  vertical_box {
-    form {
-      @first_name_entry = entry {
-        label 'First Name' # label property is available when control is nested under form
-      }
-      
-      @last_name_entry = entry {
-        label 'Last Name' # label property is available when control is nested under form
-      }
-      
-      @phone_entry = entry {
-        label 'Phone' # label property is available when control is nested under form
-      }
+  attr_accessor :first_name, :last_name, :phone, :email
+  
+  def launch
+    window('Form') {
+      margined true
       
-      @email_entry = entry {
-        label 'Email' # label property is available when control is nested under form
+      vertical_box {
+        form {
+          entry {
+            label 'First Name' # label property is available when control is nested under form
+            text <=> [self, :first_name] # bidirectional data-binding of entry text property to self first_name attribute
+          }
+          
+          entry {
+            label 'Last Name' # label property is available when control is nested under form
+            text <=> [self, :last_name]
+          }
+          
+          entry {
+            label 'Phone' # label property is available when control is nested under form
+            text <=> [self, :phone]
+          }
+          
+          entry {
+            label 'Email' # label property is available when control is nested under form
+            text <=> [self, :email]
+          }
+        }
+        
+        button('Display Info') {
+          stretchy false
+          
+          on_clicked do
+            msg_box('Info', "#{first_name} #{last_name} has phone #{phone} and email #{email}")
+          end
+        }
       }
-    }
-    
-    button('Display Info') {
-      stretchy false
-      
-      on_clicked do
-        msg_box('Info', "#{@first_name_entry.text} #{@last_name_entry.text} has phone #{@phone_entry.text} and email #{@email_entry.text}")
-      end
-    }
-  }
-}.show
+    }.show
+  end
+end
+
+Form.new.launch

data/examples/form2.rb

@@ -0,0 +1,37 @@
+# frozen_string_literal: true
+
+require 'glimmer-dsl-libui'
+
+include Glimmer
+
+window('Form') {
+  margined true
+  
+  vertical_box {
+    form {
+      @first_name_entry = entry {
+        label 'First Name' # label property is available when control is nested under form
+      }
+      
+      @last_name_entry = entry {
+        label 'Last Name' # label property is available when control is nested under form
+      }
+      
+      @phone_entry = entry {
+        label 'Phone' # label property is available when control is nested under form
+      }
+      
+      @email_entry = entry {
+        label 'Email' # label property is available when control is nested under form
+      }
+    }
+    
+    button('Display Info') {
+      stretchy false
+      
+      on_clicked do
+        msg_box('Info', "#{@first_name_entry.text} #{@last_name_entry.text} has phone #{@phone_entry.text} and email #{@email_entry.text}")
+      end
+    }
+  }
+}.show

data/examples/form_table.rb

@@ -2,94 +2,109 @@
 
 require 'glimmer-dsl-libui'
 
-include Glimmer
-
-data = [
-  ['Lisa Sky', 'lisa@sky.com', '720-523-4329', 'Denver', 'CO', '80014'],
-  ['Jordan Biggins', 'jordan@biggins.com', '617-528-5399', 'Boston', 'MA', '02101'],
-  ['Mary Glass', 'mary@glass.com', '847-589-8788', 'Elk Grove Village', 'IL', '60007'],
-  ['Darren McGrath', 'darren@mcgrath.com', '206-539-9283', 'Seattle', 'WA', '98101'],
-  ['Melody Hanheimer', 'melody@hanheimer.com', '213-493-8274', 'Los Angeles', 'CA', '90001'],
-]
-
-window('Contacts', 600, 600) { |w|
-  margined true
+class FormTable
+  include Glimmer
   
-  vertical_box {
-    form {
-      stretchy false
-      
-      @name_entry = entry {
-        label 'Name'
-      }
-      
-      @email_entry = entry {
-        label 'Email'
-      }
-      
-      @phone_entry = entry {
-        label 'Phone'
-      }
-      
-      @city_entry = entry {
-        label 'City'
-      }
-      
-      @state_entry = entry {
-        label 'State'
-      }
-    }
-    
-    button('Save Contact') {
-      stretchy false
-      
-      on_clicked do
-        new_row = [@name_entry.text, @email_entry.text, @phone_entry.text, @city_entry.text, @state_entry.text]
-        if new_row.include?('')
-          msg_box_error(w, 'Validation Error!', 'All fields are required! Please make sure to enter a value for all fields.')
-        else
-          data << new_row # automatically inserts a row into the table due to implicit data-binding
-          @unfiltered_data = data.dup
-          @name_entry.text = ''
-          @email_entry.text = ''
-          @phone_entry.text = ''
-          @city_entry.text = ''
-          @state_entry.text = ''
-        end
-      end
-    }
-    
-    search_entry { |se|
-      stretchy false
+  attr_accessor :name, :email, :phone, :city, :state, :filter_value
+  
+  def initialize
+    @data = [
+      ['Lisa Sky', 'lisa@sky.com', '720-523-4329', 'Denver', 'CO', '80014'],
+      ['Jordan Biggins', 'jordan@biggins.com', '617-528-5399', 'Boston', 'MA', '02101'],
+      ['Mary Glass', 'mary@glass.com', '847-589-8788', 'Elk Grove Village', 'IL', '60007'],
+      ['Darren McGrath', 'darren@mcgrath.com', '206-539-9283', 'Seattle', 'WA', '98101'],
+      ['Melody Hanheimer', 'melody@hanheimer.com', '213-493-8274', 'Los Angeles', 'CA', '90001'],
+    ]
+  end
+  
+  def launch
+    window('Contacts', 600, 600) { |w|
+      margined true
       
-      on_changed do
-        filter_value = se.text
-        @unfiltered_data ||= data.dup
-        # Unfilter first to remove any previous filters
-        data.replace(@unfiltered_data) # affects table indirectly through implicit data-binding
-        # Now, apply filter if entered
-        unless filter_value.empty?
-          data.filter! do |row_data| # affects table indirectly through implicit data-binding
-            row_data.any? do |cell|
-              cell.to_s.downcase.include?(filter_value.downcase)
+      vertical_box {
+        form {
+          stretchy false
+          
+          entry {
+            label 'Name'
+            text <=> [self, :name]
+          }
+          
+          entry {
+            label 'Email'
+            text <=> [self, :email]
+          }
+          
+          entry {
+            label 'Phone'
+            text <=> [self, :phone]
+          }
+          
+          entry {
+            label 'City'
+            text <=> [self, :city]
+          }
+          
+          entry {
+            label 'State'
+            text <=> [self, :state]
+          }
+        }
+        
+        button('Save Contact') {
+          stretchy false
+          
+          on_clicked do
+            new_row = [name, email, phone, city, state]
+            if new_row.include?('')
+              msg_box_error(w, 'Validation Error!', 'All fields are required! Please make sure to enter a value for all fields.')
+            else
+              @data << new_row # automatically inserts a row into the table due to implicit data-binding
+              @unfiltered_data = @data.dup
+              self.name = '' # automatically clears name entry through explicit data-binding
+              self.email = ''
+              self.phone = ''
+              self.city = ''
+              self.state = ''
             end
           end
-        end
-      end
-    }
+        }
+        
+        search_entry {
+          stretchy false
+          text <=> [self, :filter_value, # bidirectional data-binding of text to self.filter_value with after_write option
+            after_write: ->(filter_value) { # execute after write to self.filter_value
+              @unfiltered_data ||= @data.dup
+              # Unfilter first to remove any previous filters
+              @data.replace(@unfiltered_data) # affects table indirectly through implicit data-binding
+              # Now, apply filter if entered
+              unless filter_value.empty?
+                @data.filter! do |row_data| # affects table indirectly through implicit data-binding
+                  row_data.any? do |cell|
+                    cell.to_s.downcase.include?(filter_value.downcase)
+                  end
+                end
+              end
+            }
+          ]
+        }
+        
+        table {
+          text_column('Name')
+          text_column('Email')
+          text_column('Phone')
+          text_column('City')
+          text_column('State')
     
-    table {
-      text_column('Name')
-      text_column('Email')
-      text_column('Phone')
-      text_column('City')
-      text_column('State')
+          cell_rows @data # implicit data-binding
+          
+          on_changed do |row, type, row_data|
+            puts "Row #{row} #{type}: #{row_data}"
+          end
+        }
+      }
+    }.show
+  end
+end
 
-      cell_rows data # implicit data-binding
-      
-      on_changed do |row, type, row_data|
-        puts "Row #{row} #{type}: #{row_data}"
-      end
-    }
-  }
-}.show
+FormTable.new.launch

data/examples/form_table2.rb

@@ -0,0 +1,95 @@
+# frozen_string_literal: true
+
+require 'glimmer-dsl-libui'
+
+include Glimmer
+
+data = [
+  ['Lisa Sky', 'lisa@sky.com', '720-523-4329', 'Denver', 'CO', '80014'],
+  ['Jordan Biggins', 'jordan@biggins.com', '617-528-5399', 'Boston', 'MA', '02101'],
+  ['Mary Glass', 'mary@glass.com', '847-589-8788', 'Elk Grove Village', 'IL', '60007'],
+  ['Darren McGrath', 'darren@mcgrath.com', '206-539-9283', 'Seattle', 'WA', '98101'],
+  ['Melody Hanheimer', 'melody@hanheimer.com', '213-493-8274', 'Los Angeles', 'CA', '90001'],
+]
+
+window('Contacts', 600, 600) { |w|
+  margined true
+  
+  vertical_box {
+    form {
+      stretchy false
+      
+      @name_entry = entry {
+        label 'Name'
+      }
+      
+      @email_entry = entry {
+        label 'Email'
+      }
+      
+      @phone_entry = entry {
+        label 'Phone'
+      }
+      
+      @city_entry = entry {
+        label 'City'
+      }
+      
+      @state_entry = entry {
+        label 'State'
+      }
+    }
+    
+    button('Save Contact') {
+      stretchy false
+      
+      on_clicked do
+        new_row = [@name_entry.text, @email_entry.text, @phone_entry.text, @city_entry.text, @state_entry.text]
+        if new_row.include?('')
+          msg_box_error(w, 'Validation Error!', 'All fields are required! Please make sure to enter a value for all fields.')
+        else
+          data << new_row # automatically inserts a row into the table due to implicit data-binding
+          @unfiltered_data = data.dup
+          @name_entry.text = ''
+          @email_entry.text = ''
+          @phone_entry.text = ''
+          @city_entry.text = ''
+          @state_entry.text = ''
+        end
+      end
+    }
+    
+    search_entry { |se|
+      stretchy false
+      
+      on_changed do
+        filter_value = se.text
+        @unfiltered_data ||= data.dup
+        # Unfilter first to remove any previous filters
+        data.replace(@unfiltered_data) # affects table indirectly through implicit data-binding
+        # Now, apply filter if entered
+        unless filter_value.empty?
+          data.filter! do |row_data| # affects table indirectly through implicit data-binding
+            row_data.any? do |cell|
+              cell.to_s.downcase.include?(filter_value.downcase)
+            end
+          end
+        end
+      end
+    }
+    
+    table {
+      text_column('Name')
+      text_column('Email')
+      text_column('Phone')
+      text_column('City')
+      text_column('State')
+
+      cell_rows data # implicit data-binding
+      
+      on_changed do |row, type, row_data|
+        puts "Row #{row} #{type}: #{row_data}"
+      end
+    }
+  }
+}.show

data/examples/login.rb

@@ -1,45 +1,51 @@
-# frozen_string_literal: true
-
 require 'glimmer-dsl-libui'
 
-include Glimmer
-
-window('Login') {
-  margined true
+class Login
+  include Glimmer
   
-  vertical_box {
-    form {
-      @username_entry = entry {
-        label 'Username:'
-      }
-      
-      @password_entry = password_entry {
-        label 'Password:'
-      }
-    }
-    
-    horizontal_box {
-      @login_button = button('Login') {
-        on_clicked do
-          @username_entry.enabled = false
-          @password_entry.enabled = false
-          @login_button.enabled = false
-          @logout_button.enabled = true
-        end
-      }
+  attr_accessor :username, :password, :logged_in
+  
+  def launch
+    window('Login') {
+      margined true
       
-      @logout_button = button('Logout') {
-        enabled false
+      vertical_box {
+        form {
+          entry {
+            label 'Username:'
+            text <=> [self, :username]
+            enabled <= [self, :logged_in, on_read: :!] # `on_read: :!` negates read value
+          }
+          
+          password_entry {
+            label 'Password:'
+            text <=> [self, :password]
+            enabled <= [self, :logged_in, on_read: :!]
+          }
+        }
         
-        on_clicked do
-          @username_entry.text = ''
-          @password_entry.text = ''
-          @username_entry.enabled = true
-          @password_entry.enabled = true
-          @login_button.enabled = true
-          @logout_button.enabled = false
-        end
+        horizontal_box {
+          button('Login') {
+            enabled <= [self, :logged_in, on_read: :!]
+            
+            on_clicked do
+              self.logged_in = true
+            end
+          }
+          
+          button('Logout') {
+            enabled <= [self, :logged_in]
+            
+            on_clicked do
+              self.logged_in = false
+              self.username = ''
+              self.password = ''
+            end
+          }
+        }
       }
-    }
-  }
-}.show
+    }.show
+  end
+end
+
+Login.new.launch