Posted to tcl by emiliano at Thu Nov 11 19:26:09 GMT 2010view pretty
package require Tk proc buildtree {tv} { catch {destroy $tv} append tv $i ttk::treeview $tv -columns {hello bye} -show headings $tv column hello -width 120 -stretch 0 $tv column bye -width 120 -stretch 0 $tv heading hello -text "Hello\nWorld" $tv heading bye -text "Bye\nWorld" # this set the correct heading height, but only on the first treeview $tv heading #0 -text "H\nj" pack $tv } buildtree .tv after 3000 buildtree .tv
Comments
Posted by emiliano at Thu Nov 11 19:36:25 GMT 2010 [text] [code]
oops, remove the [append tv $i] line