canvasx

$canvaseditor canvasx num: returns floating point canvas coord x

obj method canvaseditor canvasx x {
   set nachkomma [expr {$x - round($x)}]
   expr {([$self canvas canvasx $x] + $nachkomma) / [my zoom]}
}