glimmer-dsl-swt 4.20.10.2 → 4.20.12.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 000b4a8f162d5c704b42f5645ca5b973c05c467bc41c07eb0e72694d1a0a14e1
-  data.tar.gz: 02c12b5b68b221fefa97e6e306df8676dec5099b9a1a4d3d5d474cf52ab724ed
+  metadata.gz: 8665a978cb56164d4d65f8c141e63e1ca080ef9b0c0bf1a91e9032016967cd41
+  data.tar.gz: 4d21198129e1c53e30e0aa712b1242d518b41e2170c57f03b9ada278df32823d
 SHA512:
-  metadata.gz: 26914357186c16c0cd8b85c0ca78b02e881a7cb25a9b30b12ca63d5fa1f0a9d388b80b17cce764d714096c8a3bb0cb0bddfe0bb30fb142d2229b6436ce9e4d0f
-  data.tar.gz: f4f8be4d7e024dceae6cbb7af3f30e6aea15f1296a446c1c0197285b1d56fd68a8656af7607cbbbaf50e2dc2c858b60f13c77c9d6d0eb2efaa09c75e75d5c796
+  metadata.gz: 9767e3499bf28485234a4769c031d5a44b95b74e6ca134b8c89234db0fd152a8f6b8e993df30808e42dc877e1633a26c201beec7cfca510739b785033639f75f
+  data.tar.gz: 11dd762db3a0e6fbe2c2445bceb45ddc809b6cc99301aad405612f1a52b6b2553d5fb0f448b9bf0adb75729b76b52f227e2ae4db2baea497fbb537fc8dc15f12

data/CHANGELOG.md

@@ -1,5 +1,24 @@
 # Change Log
 
+### 4.20.12.1
+
+- Hello, Canvas Drag & Drop! sample
+
+### 4.20.12.0
+
+- Canvas Shape Listeners: on_mouse_up, on_mouse_down, on_mouse_move, on_drag_detected
+- Make scaffolding not generate an empty () after shell
+- Hello, Canvas Shape Listeners! Sample
+
+### 4.20.11.1
+
+- Make scaffolded app project use bundler optionally only and still load glimmer-dsl-swt otherwise, like in gem-packaged mode (`glimmer package:gem`) to avoid erroring out about bundler.
+
+### 4.20.11.0
+
+- Shape `#center_x`/`#center_y` methods to identify a shape's center point
+- Shape `#rotate` method to rotate around center point
+
 ### 4.20.10.2
 
 - Fix issue "Resolve 'NameError: uninitialized constant Glimmer::DataBinding' on Windows" https://github.com/AndyObtiva/glimmer-dsl-swt/issues/9 (originally in https://github.com/AMaleh/glimmer-dsl-swt/pull/1)

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 SWT 4.20.10.2
+# [<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 SWT 4.20.12.1
 ## JRuby Desktop Development GUI Framework
 [![Gem Version](https://badge.fury.io/rb/glimmer-dsl-swt.svg)](http://badge.fury.io/rb/glimmer-dsl-swt)
 [![Travis CI](https://travis-ci.com/AndyObtiva/glimmer-dsl-swt.svg?branch=master)](https://travis-ci.com/github/AndyObtiva/glimmer-dsl-swt)
@@ -15,7 +15,7 @@
 [<img src="https://covers.oreillystatic.com/images/9780596519650/lrg.jpg" width=105 /><br />
 Featured in JRuby Cookbook](http://shop.oreilly.com/product/9780596519650.do) and [Chalmers/Gothenburg University Software Engineering Master's Lecture Material](http://www.cse.chalmers.se/~bergert/slides/guest_lecture_DSLs.pdf)
 
-[Glimmer DSL for SWT](https://rubygems.org/gems/glimmer-dsl-swt) 4.20.10.2 includes [SWT 4.20](https://download.eclipse.org/eclipse/downloads/drops4/R-4.20-202106111600/), which was released on June 11, 2021. Gem version numbers are in sync with the SWT library versions. The first two digits represent the SWT version number. The last two digits represent the minor and patch versions of Glimmer DSL for SWT. Note that SWT now supports AARCH64 on Mac and Linux, but it is not fully tested in Glimmer DSL for SWT yet, so deem its support experimental for the time being without guarantees for functionality until declared otherwise (report any issues you may encounter).
+[Glimmer DSL for SWT](https://rubygems.org/gems/glimmer-dsl-swt) 4.20.12.1 includes [SWT 4.20](https://download.eclipse.org/eclipse/downloads/drops4/R-4.20-202106111600/), which was released on June 11, 2021. Gem version numbers are in sync with the SWT library versions. The first two digits represent the SWT version number. The last two digits represent the minor and patch versions of Glimmer DSL for SWT. Note that SWT now supports AARCH64 on Mac and Linux, but it is not fully tested in Glimmer DSL for SWT yet, so deem its support experimental for the time being without guarantees for functionality until declared otherwise (report any issues you may encounter).
 
 **Starting in version 4.20.0.0, [Glimmer DSL for SWT](https://rubygems.org/gems/glimmer-dsl-swt) comes with the new [***Shine***](/docs/reference/GLIMMER_GUI_DSL_SYNTAX.md#shine) syntax** for highly intuitive and visually expressive View/Model Attribute Mapping, relying on `<=>` for bidirectional (two-way) data-binding and `<=` for unidirectional (one-way) data-binding, providing an alternative to the `bind` keyword (keep in mind that it is still a beta, so default back to `bind` whenever needed).
 
@@ -45,12 +45,6 @@ shell {
 }.open
 ```
 
-Run via `glimmer samples` or directly:
-
-```
-glimmer samples/hello/hello_world.rb
-```
-
 Glimmer app:
 
 ![Hello World](images/glimmer-hello-world.png)
@@ -62,25 +56,25 @@ Learn more about [Hello, World!](docs/reference/GLIMMER_SAMPLES#hello-world).
 Glimmer GUI DSL code (from [samples/hello/hello_table.rb](samples/hello/hello_table.rb)):
 
 ```ruby
-# ... model code precedes
 shell {
   grid_layout
   
   text 'Hello, Table!'
   background_image File.expand_path('hello_table/baseball_park.png', __dir__)
+  image File.expand_path('hello_table/baseball_park.png', __dir__)
   
   label {
     layout_data :center, :center, true, false
     
     text 'BASEBALL PLAYOFF SCHEDULE'
-    background :transparent
+    background :transparent if OS.windows?
     foreground rgb(94, 107, 103)
     font name: 'Optima', height: 38, style: :bold
   }
   
   combo(:read_only) {
     layout_data :center, :center, true, false
-    selection bind(BaseballGame, :playoff_type)
+    selection <=> [BaseballGame, :playoff_type]
     font height: 14
   }
   
@@ -121,10 +115,10 @@ shell {
     }
     
     # Data-bind table items (rows) to a model collection property, specifying column properties ordering per nested model
-    items bind(BaseballGame, :schedule), column_properties(:game_date, :game_time, :ballpark, :home_team, :away_team, :promotion)
+    items <=> [BaseballGame, :schedule, column_properties: [:game_date, :game_time, :ballpark, :home_team, :away_team, :promotion]]
     
     # Data-bind table selection
-    selection bind(BaseballGame, :selected_game)
+    selection <=> [BaseballGame, :selected_game]
     
     # Default initial sort property
     sort_property :date
@@ -147,20 +141,13 @@ shell {
     text 'Book Selected Game'
     layout_data :center, :center, true, false
     font height: 14
-    enabled bind(BaseballGame, :selected_game)
+    enabled <= [BaseballGame, :selected_game]
     
     on_widget_selected {
       book_selected_game
     }
   }
-}.open
-# ...
-```
-
-Run via `glimmer samples` or directly:
-
-```
-glimmer samples/hello/hello_table.rb
+}
 ```
 
 Glimmer App:
@@ -174,7 +161,6 @@ Learn more about [Hello, Table!](docs/reference/GLIMMER_SAMPLES#hello-table).
 Glimmer GUI DSL code (from [samples/elaborate/tetris.rb](samples/elaborate/tetris.rb)):
 
 ```ruby
-# ... more code resides in other files (navigate sample files to learn more)
 shell(:no_resize) {
   grid_layout {
     num_columns 2
@@ -196,13 +182,6 @@ shell(:no_resize) {
     layout_data(:fill, :fill, true, true)
   }
 }
-# ...
-```
-
-Run via `glimmer samples` or directly:
-
-```
-glimmer samples/elaborate/tetris.rb
 ```
 
 Glimmer app:
@@ -347,7 +326,7 @@ jgem install glimmer-dsl-swt
 
 Or this command if you want a specific version:
 ```
-jgem install glimmer-dsl-swt -v 4.20.10.2
+jgem install glimmer-dsl-swt -v 4.20.12.1
 ```
 
 `jgem` is JRuby's version of `gem` command.
@@ -375,7 +354,7 @@ Note: if you're using activerecord or activesupport, keep in mind that Glimmer u
 
 Add the following to `Gemfile`:
 ```
-gem 'glimmer-dsl-swt', '~> 4.20.10.2'
+gem 'glimmer-dsl-swt', '~> 4.20.12.1'
 ```
 
 And, then run:
@@ -396,7 +375,7 @@ glimmer
 ```
 
 ```
-Glimmer (JRuby Desktop Development GUI Framework) - JRuby Gem: glimmer-dsl-swt v4.20.10.2
+Glimmer (JRuby Desktop Development GUI Framework) - JRuby Gem: glimmer-dsl-swt v4.20.12.1
       
 Usage: glimmer [--bundler] [--pd] [--quiet] [--debug] [--log-level=VALUE] [[ENV_VAR=VALUE]...] [[-jruby-option]...] (application.rb or task[task_args]) [[application2.rb]...]
 
@@ -443,7 +422,9 @@ Select a Glimmer task to run: (Press ↑/↓ arrow to move, Enter to select and
   glimmer scaffold:gem:customwidget[name,namespace]          # Scaffold Glimmer::UI::CustomWidget subclass (part of a view) under its own Ruby gem project (namespace is required) [alt: scaffold:gem:cw]
 ```
 
-Learn more at: [docs/reference/GLIMMER_COMMAND.md](docs/reference/GLIMMER_COMMAND.md)
+Learn more at:
+
+[docs/reference/GLIMMER_COMMAND.md](docs/reference/GLIMMER_COMMAND.md)
 
 ## Girb (Glimmer irb) Command
 
@@ -455,7 +436,9 @@ girb
 
 ![GIRB](/images/glimmer-girb.png)
 
-Learn more at: [docs/reference/GLIMMER_GIRB.md](docs/reference/GLIMMER_GIRB.md)
+Learn more at:
+
+[docs/reference/GLIMMER_GIRB.md](docs/reference/GLIMMER_GIRB.md)
 
 ## Glimmer GUI DSL Syntax
 
@@ -495,13 +478,17 @@ table(:multi) {
 
 If you need more widgets, you can check out the [Nebula Project](https://github.com/AndyObtiva/glimmer-cw-nebula) (50+ enterprise-grade custom widgets)
 
-Learn more at: [docs/reference/GLIMMER_GUI_DSL_SYNTAX.md](docs/reference/GLIMMER_GUI_DSL_SYNTAX.md)
+Learn more at:
+
+[docs/reference/GLIMMER_GUI_DSL_SYNTAX.md](docs/reference/GLIMMER_GUI_DSL_SYNTAX.md)
 
 ## Glimmer Configuration
 
 Glimmer configuration may be done via the `Glimmer::Config` module.
 
-Learn more at: [docs/reference/GLIMMER_CONFIGURATION.md](docs/reference/GLIMMER_CONFIGURATION.md)
+Learn more at:
+
+[docs/reference/GLIMMER_CONFIGURATION.md](docs/reference/GLIMMER_CONFIGURATION.md)
 
 ## Glimmer Style Guide
 
@@ -509,6 +496,10 @@ Learn more at: [docs/reference/GLIMMER_CONFIGURATION.md](docs/reference/GLIMMER_
 
 ## Samples
 
+See a listing of samples including screenshots and explanations at:
+
+[docs/reference/GLIMMER_SAMPLES.md](/docs/reference/GLIMMER_SAMPLES.md)
+
 Check the [samples](/docs/reference/GLIMMER_SAMPLES.md) directory in [glimmer-dsl-swt](https://github.com/AndyObtiva/glimmer-dsl-swt) for examples on how to write Glimmer applications. To run a sample, make sure to install the `glimmer-dsl-swt` gem first and then run:
 ```
 glimmer samples
@@ -518,8 +509,6 @@ glimmer samples
 
 ![Glimmer Meta-Sample](/images/glimmer-meta-sample.png)
 
-See a listing of samples including screenshots and explanations at: [docs/reference/GLIMMER_SAMPLES.md](/docs/reference/GLIMMER_SAMPLES.md)
-
 ## In Production
 
 The following production apps have been built with Glimmer.

data/VERSION

@@ -1 +1 @@
-4.20.10.2
+4.20.12.1

data/docs/reference/GLIMMER_GUI_DSL_SYNTAX.md

@@ -1901,6 +1901,8 @@ They are implemented with the help of the highly robust Java built-in shape geom
 - `Shape#contain?(x, y)` : indicates if shape contains x, y point
 - `Shape#include?(x, y)` : indicates if shape includes x, y point on the edge if drawn or inside if filled (include uses contain for filled shapes)
 - `Shape#move_by(x_delta, y_delta)` : moves shape object at x, y location
+- `Shape#rotate(angle)` : rotates around center by an angle (not cumulative, reseting angle on every call)
+- `Shape#rotatation_angle` : current rotation angle (according to use of rotate method)
 - `Shape#dispose` : disposes of shape, removing it form its parent canvas, widget, or shape
 - `Shape#content {}` : reopens a shape to add more content inside it using the Glimmer GUI DSL (e.g. Canvas Shape DSL) just like `WidgetProxy#content {}`.
 - `Shape#size` : calculated size for shape bounding box (e.g. a polygon with an irregular shape will have its bounding box width and height calculated)
@@ -1921,6 +1923,10 @@ They are implemented with the help of the highly robust Java built-in shape geom
 - `Shape#default_y?` : calculated top-left corner y position
 - `Shape#calculated_x` : calculated top-left corner x position when default/delta is set (i.e. centered within parent)
 - `Shape#calculated_y` : calculated top-left corner y position when default/delta is set (i.e. centered within parent)
+- `Shape#center_x` : center x
+- `Shape#center_y` : center y
+- `Shape#x_end` : right-most included x coordinate
+- `Shape#y_end` : bottom-most included y coordinate
 
 Check [Hello, Canvas!](GLIMMER_SAMPLES.md#hello-canvas) for an example.
 

data/docs/reference/GLIMMER_SAMPLES.md

@@ -44,6 +44,8 @@
     - [Hello, Canvas Transform!](#hello-canvas-transform)
     - [Hello, Canvas Path!](#hello-canvas-path)
     - [Hello, Canvas Data Binding!](#hello-canvas-data-binding)
+    - [Hello, Canvas Shape Listeners!](#hello-canvas-shape-listeners)
+    - [Hello, Canvas Drag and Drop!](#hello-canvas-drag-and-drop)
     - [Hello, Cursor!](#hello-cursor)
     - [Hello, Progress Bar!](#hello-progress-bar)
     - [Hello, Tree!](#hello-tree)
@@ -816,6 +818,32 @@ Hello, Canvas Data Binding!
 
 ![Hello Canvas Data Binding Line Changed](/images/glimmer-hello-canvas-data-binding-line-changed.png)
 
+#### Hello, Canvas Shape Listeners!
+
+This sample demonstrates Canvas Shape DSL listeners, which are constrained within the bounds of their owning shape.
+
+Code:
+
+[samples/hello/hello_canvas_shape_listeners.rb](/samples/hello/hello_canvas_shape_listeners.rb)
+
+Hello, Canvas Shape Listeners!
+
+![Hello Canvas Shape Listeners](/images/glimmer-hello-canvas-shape-listeners.png)
+
+Hello, Canvas Shape Listeners! - Dragged Circle
+
+![Hello Canvas Shape Listeners Dragged](/images/glimmer-hello-canvas-shape-listeners-dragged.png)
+
+#### Hello, Canvas Drag and Drop!
+
+This sample demonstrates Canvas Shape DSL drag and drop (different from standard widget drag and drop).
+
+Code:
+
+[samples/hello/hello_canvas_drag_and_drop.rb](/samples/hello/hello_canvas_drag_and_drop.rb)
+
+![Hello Canvas Drag and Drop](/images/glimmer-hello-canvas-drag-and-drop.gif)
+
 #### Hello, Cursor!
 
 This sample demonstrates the use of the `cursor` property keyword to change the mouse cursor.

data/lib/glimmer/dsl/swt/widget_listener_expression.rb

@@ -21,6 +21,7 @@
 
 require 'glimmer/dsl/expression'
 require 'glimmer/swt/display_proxy'
+require 'glimmer/swt/custom/shape'
 
 module Glimmer
   module DSL
@@ -31,9 +32,9 @@ module Glimmer
         def can_interpret?(parent, keyword, *args, &block)
           Glimmer::Config.logger.debug {"keyword starts with on_: #{keyword.start_with?('on_')}"}
           return false unless keyword.start_with?('on_')
-          widget_or_display_parentage = parent.respond_to?(:swt_widget) || parent.is_a?(Glimmer::SWT::DisplayProxy)
-          Glimmer::Config.logger.debug {"parent #{parent} is a widget or display: #{widget_or_display_parentage}"}
-          return false unless widget_or_display_parentage
+          proper_parent = parent.respond_to?(:swt_widget) || parent.is_a?(Glimmer::SWT::DisplayProxy) || parent.is_a?(Glimmer::SWT::Custom::Shape)
+          Glimmer::Config.logger.debug {"parent #{parent} is a widget, shape, or display: #{proper_parent}"}
+          return false unless proper_parent
           Glimmer::Config.logger.debug {"block exists?: #{!block.nil?}"}
           raise Glimmer::Error, "Listener is missing block for keyword: #{keyword}" unless block_given?
           Glimmer::Config.logger.debug {"args are empty?: #{args.empty?}"}

data/lib/glimmer/rake_task/scaffold.rb

@@ -445,9 +445,15 @@ module Glimmer
         def app_main_file(app_name)
           <<~MULTI_LINE_STRING
             $LOAD_PATH.unshift(File.expand_path('..', __FILE__))
-    
-            require 'bundler/setup'
-            Bundler.require(:default)
+            
+            begin
+              require 'bundler/setup'
+              Bundler.require(:default)
+            rescue
+              # this runs when packaged as a gem (no bundler)
+              require 'glimmer-dsl-swt'
+              # add more gems if needed
+            end
             require '#{file_name(app_name)}/view/app_view'
     
             class #{class_name(app_name)}
@@ -634,7 +640,7 @@ module Glimmer
       ## Top-most widget must be a shell or another custom shell
       #
       body {
-        shell(#{':fill_screen' if shell_type == :desktopify}) {
+        shell#{'(:fill_screen)' if shell_type == :desktopify} {
           # Replace example content below with custom shell content
           minimum_size #{shell_type == :desktopify ? '768, 432' : '420, 240'}
           image File.join(APP_ROOT, 'package', 'windows', "#{human_name(shell_type == :gem ? custom_shell_name : current_dir_name)}.ico") if OS.windows?

data/lib/glimmer/swt/custom/code_text.rb

@@ -1,3 +1,24 @@
+# Copyright (c) 2007-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/ui/custom_widget'
 
 module Glimmer

data/lib/glimmer/swt/custom/shape.rb

@@ -239,6 +239,46 @@ module Glimmer
             end
           end
         end
+        alias translate move_by
+        
+        # rotates shape for an angle around its center
+        # this operation is not cumulative (it resets angle every time)
+        # consumers may inspect corresponding rotation_angle attribute to know which angle the shape is currently at for convenience
+        # this overrides any pre-existing transforms that are applied to shape
+        def rotate(angle)
+          half_width = calculated_width/2.0
+          half_height = calculated_height/2.0
+          self.transform = Glimmer::SWT::TransformProxy.new(self).translate(half_width, half_height).rotate(angle).translate(-1.0*half_width, -1.0*half_height)
+          @rotation_angle = angle
+        end
+        
+        # returns rotation angle
+        # consumers may inspect rotation_angle attribute to know which angle the shape is rotated at via rotate method
+        # it is not guaranteed to give the right result if a transform is applied outside of rotate method.
+        # starts at 0
+        def rotation_angle
+          @rotation_angle.to_f
+        end
+        
+        def center_x
+          center_x_dependencies = [x_end, calculated_width]
+          if center_x_dependencies != @center_x_dependencies
+            @center_x_dependencies = center_x_dependencies
+            the_x_end, the_calculated_width = center_x_dependencies
+            @center_x = the_x_end - the_calculated_width/2.0
+          end
+          @center_x
+        end
+        
+        def center_y
+          center_y_dependencies = [y_end, calculated_height]
+          if center_y_dependencies != @center_y_dependencies
+            @center_y_dependencies = center_y_dependencies
+            the_y_end, the_calculated_height = center_y_dependencies
+            @center_y = the_y_end - the_calculated_height/2.0
+          end
+          @center_y
+        end
         
         def content(&block)
           Glimmer::SWT::DisplayProxy.instance.auto_exec do
@@ -524,6 +564,19 @@ module Glimmer
           end
         end
         
+        def can_handle_observation_request?(observation_request)
+          drawable.can_handle_observation_request?(observation_request)
+        end
+        
+        def handle_observation_request(observation_request, &block)
+          shape_block = lambda do |event|
+            block.call(event) if include?(event.x, event.y)
+          end
+          drawable.handle_observation_request(observation_request, &shape_block)
+          if shapes.present?
+          end
+        end
+        
         # Sets data just like SWT widgets
         def set_data(key=nil, value)
           @data ||= {}
@@ -936,7 +989,7 @@ module Glimmer
           @x_end
         end
         
-        # right-most y coordinate in this shape (adding up its height and location)
+        # bottom-most y coordinate in this shape (adding up its height and location)
         def y_end
           y_end_dependencies = [calculated_height, default_y?, !default_y? && y]
           if y_end_dependencies != @y_end_dependencies

data/lib/glimmer/swt/custom/shape/image.rb

@@ -25,6 +25,7 @@ require 'glimmer/swt/display_proxy'
 require 'glimmer/swt/color_proxy'
 require 'glimmer/swt/font_proxy'
 require 'glimmer/swt/transform_proxy'
+require 'glimmer/swt/image_proxy'
 
 module Glimmer
   module SWT
@@ -69,11 +70,15 @@ module Glimmer
           end
           
           def width
-            dest_width || image.bounds.width
+            dest_width || image_proxy.bounds.width
           end
           
           def height
-            dest_height || image.bounds.height
+            dest_height || image_proxy.bounds.height
+          end
+          
+          def image_proxy
+            ImageProxy.create(image)
           end
           
           def default_x?

data/lib/glimmer/ui/custom_shape.rb

@@ -180,7 +180,7 @@ module Glimmer
         raise Glimmer::Error, 'Invalid custom shape for having no body! Please define body block!' if body_block.nil?
         @body_root = instance_exec(&body_block)
         raise Glimmer::Error, 'Invalid custom shape for having an empty body! Please fill body block!' if @body_root.nil?
-        auto_exec do
+        auto_exec do # TODO is this necessary given shape is a lightweight construct (not SWT widget) ?
           @body_root.set_data('custom_shape', self)
         end
         execute_hook('after_body')

data/samples/hello/hello_canvas_drag_and_drop.rb

@@ -0,0 +1,95 @@
+require 'glimmer-dsl-swt'
+
+class HelloCanvasDragAndDrop
+  include Glimmer::UI::CustomShell
+            
+  body {
+    shell {
+      row_layout(:vertical) {
+        margin_width 0
+        margin_height 0
+        fill true
+        center true
+      }
+      text 'Hello, Canvas Drag & Drop!'
+      
+      label(:center) {
+        text 'Drag orange balls and drop in the square.'
+        font height: 16
+      }
+      
+      canvas {
+        layout_data {
+          width 350
+          height 350
+        }
+      
+        background :white
+        
+        @drop_square_border = rectangle(150, 260, 50, 50) {
+          foreground :black
+          line_width 3
+          line_style :dash
+        }
+                              
+        @drop_square = rectangle(153, 263, 44, 44) {
+          background :transparent
+                    
+          @number_shape = text {
+            x :default
+            y :default
+            string '0'
+          }
+        
+          on_mouse_move do
+            if @dragging
+              @drop_square_border.foreground = :red
+            end
+          end
+          
+          on_mouse_up do
+            if @dragging
+              ball_count = @number_shape.string.to_i
+              @number_shape.dispose
+              @drop_square.content {
+                @number_shape = text {
+                  x :default
+                  y :default
+                  string (ball_count + 1).to_s
+                }
+              }
+              @dragging.dispose
+            end
+          end
+        }
+                                         
+        10.times do |n|
+          an_oval = oval((rand*300).to_i, (rand*200).to_i, 50, 50) {
+            background rgb(255, 165, 0)
+
+            on_drag_detected do |event|
+              @dragging = an_oval
+              @last_x = event.x
+              @last_y = event.y
+            end
+          }
+        end
+                                         
+        on_mouse_up do
+          @drop_square_border.foreground = :black
+          @dragging = nil
+        end
+              
+        on_mouse_move do |event|
+          if @dragging
+            @dragging.move_by((event.x - @last_x), (event.y - @last_y))
+            @last_x = event.x
+            @last_y = event.y
+          end
+        end
+      }
+    }
+  }
+end
+ 
+HelloCanvasDragAndDrop.launch

data/samples/hello/hello_canvas_shape_listeners.rb

@@ -0,0 +1,171 @@
+# Copyright (c) 2007-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-swt'
+
+class HelloCanvasShapeListeners
+  include Glimmer::UI::CustomShell
+  
+  attr_accessor :shape_name, :listener_event, :dragged_shape
+
+  body {
+    shell {
+      row_layout(:vertical) {
+        fill true
+        center true
+        margin_width 0
+        margin_height 0
+      }
+      
+      text 'Hello, Canvas Shape Listeners!'
+      
+      label(:center) {
+        text 'Current Shape:'
+        font style: :bold
+      }
+      label(:center) {
+        text <= [self, :shape_name]
+      }
+      
+      label(:center) {
+        text 'Current Event:'
+        font style: :bold
+      }
+      label(:center) {
+        text <= [self, :listener_event]
+      }
+      
+      canvas { |canvas_proxy|
+        layout_data {
+          width 350
+          height 200
+        }
+        
+        background :white
+      
+        @rectangle = rectangle(25, 25, 50, 50) {
+          background :red
+                    
+          # these listener events are limited to the rectangle bounds
+                    
+          on_mouse_down do |event|
+            self.shape_name = 'Square'
+            self.listener_event = 'Mouse Down'
+          end
+          
+          on_drag_detected do |event|
+            self.shape_name = 'Square'
+            self.listener_event += ' / Drag Detected'
+            self.dragged_shape = @rectangle
+          end
+          
+          on_mouse_move do |event|
+            if listener_event.to_s.empty? || shape_name != 'Square'
+              self.listener_event = "Mouse Move"
+            elsif !listener_event.to_s.include?('Mouse Move')
+              self.listener_event += " / Mouse Move"
+            end
+            self.shape_name = 'Square'
+          end
+          
+          on_mouse_up do |event|
+            self.shape_name = 'Square'
+            self.listener_event += ' / Mouse Up'
+            self.dragged_shape = nil
+          end
+        }
+        
+        @oval = oval(150, 120, 50, 50) {
+          background :green
+          
+          # these listener events are limited to the oval bounds
+          
+          on_mouse_down do |event|
+            self.shape_name = 'Circle'
+            self.listener_event = 'Mouse Down'
+          end
+          
+          on_drag_detected do |event|
+            self.shape_name = 'Circle'
+            self.listener_event += ' / Drag Detected'
+            self.dragged_shape = @oval
+          end
+          
+          on_mouse_move do |event|
+            if listener_event.to_s.empty? || shape_name != 'Circle'
+              self.listener_event = "Mouse Move"
+            elsif !listener_event.to_s.include?('Mouse Move')
+              self.listener_event += " / Mouse Move"
+            end
+            self.shape_name = 'Circle'
+          end
+          
+          on_mouse_up do |event|
+            self.shape_name = 'Circle'
+            self.listener_event += ' / Mouse Up'
+            self.dragged_shape = nil
+          end
+        }
+        
+        @polygon = polygon(260, 25, 300, 25, 260, 65) {
+          background :blue
+          
+          # these listener events are limited to the polygon bounds
+          
+          on_mouse_down do |event|
+            self.shape_name = 'Triangle'
+            self.listener_event = 'Mouse Down'
+          end
+          
+          on_drag_detected do |event|
+            self.shape_name = 'Triangle'
+            self.listener_event += ' / Drag Detected'
+            self.dragged_shape = @polygon
+          end
+          
+          on_mouse_move do |event|
+            if listener_event.to_s.empty? || shape_name != 'Triangle'
+              self.listener_event = "Mouse Move"
+            elsif !listener_event.to_s.include?('Mouse Move')
+              self.listener_event += " / Mouse Move"
+            end
+            self.shape_name = 'Triangle'
+          end
+          
+          on_mouse_up do |event|
+            self.shape_name = 'Triangle'
+            self.listener_event += ' / Mouse Up'
+            self.dragged_shape = nil
+          end
+        }
+
+        # This is a general canvas listener event, which is used to move shape even if mouse goes out of its bounds
+        on_mouse_move do |event|
+          dragged_shape.move_by(event.x - @last_x.to_f, event.y - @last_y.to_f) if dragged_shape
+          @last_x = event.x
+          @last_y = event.y
+        end
+      }
+    }
+  }
+end
+
+HelloCanvasShapeListeners.launch

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: glimmer-dsl-swt
 version: !ruby/object:Gem::Version
-  version: 4.20.10.2
+  version: 4.20.12.1
 platform: ruby
 authors:
 - Andy Maleh
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2021-07-22 00:00:00.000000000 Z
+date: 2021-07-26 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   requirement: !ruby/object:Gem::Requirement
@@ -576,7 +576,9 @@ files:
 - samples/hello/hello_canvas_animation.rb
 - samples/hello/hello_canvas_animation_multi.rb
 - samples/hello/hello_canvas_data_binding.rb
+- samples/hello/hello_canvas_drag_and_drop.rb
 - samples/hello/hello_canvas_path.rb
+- samples/hello/hello_canvas_shape_listeners.rb
 - samples/hello/hello_canvas_transform.rb
 - samples/hello/hello_checkbox.rb
 - samples/hello/hello_checkbox_group.rb