Posted to tcl by schelte at Sat Sep 06 14:13:28 GMT 2014view pretty

canvas .c
set id [.c create text 0 0 -text hello]
.c moveto $id 10 10
puts [.c coords $id]