diff options
| author | treectrl <treectrl> | 2002-12-24 05:58:13 (GMT) |
|---|---|---|
| committer | treectrl <treectrl> | 2002-12-24 05:58:13 (GMT) |
| commit | 2fe40f45dce426943d696b733fd4a6c739101bdf (patch) | |
| tree | 8397a7d79553fd01885c2ce7b84a4b040abcf80d | |
| parent | d055accc7ffd2194121ae5ffb3796b069f63b639 (diff) | |
| download | tktreectrl-2fe40f45dce426943d696b733fd4a6c739101bdf.zip tktreectrl-2fe40f45dce426943d696b733fd4a6c739101bdf.tar.gz tktreectrl-2fe40f45dce426943d696b733fd4a6c739101bdf.tar.bz2 | |
Set -treecolumn to zero after deleting columns (otherwise it is -1).
| -rw-r--r-- | demo.tcl | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -744,7 +744,8 @@ proc DemoClear {} { $T configure -orient vertical -wrap "" -xscrollincrement 0 \ -yscrollincrement 0 -itemheight 0 -showheader yes \ -background white -scrollmargin 0 -xscrolldelay 50 -yscrolldelay 50 \ - -openbuttonimage "" -closedbuttonimage "" -backgroundmode row + -openbuttonimage "" -closedbuttonimage "" -backgroundmode row \ + -treecolumn 0 # Restore default bindings to the demo list bindtags $T [list $T TreeCtrl [winfo toplevel $T] all] |