rightmostdot

$canvaseditor rightmostDot ?-gravity?: returns rightmost dot in selection

obj method canvaseditor rightmostDot args {
  foreach dot [$self dots -selected {*}$args] {
    dict set all [$dot cget -x] $dot
  }
  dict get $all [max {*}[dict keys $all]]
}