diff options
author | treectrl <treectrl> | 2005-05-27 20:01:19 (GMT) |
---|---|---|
committer | treectrl <treectrl> | 2005-05-27 20:01:19 (GMT) |
commit | e15184085e116af9caa871c796c9df4917eafd71 (patch) | |
tree | 2ca467642b418463620aca765a1ab626ab807dce /demos/demo.tcl | |
parent | fe089ed2bdabe21846e01ef960136201e28d4284 (diff) | |
download | tktreectrl-e15184085e116af9caa871c796c9df4917eafd71.zip tktreectrl-e15184085e116af9caa871c796c9df4917eafd71.tar.gz tktreectrl-e15184085e116af9caa871c796c9df4917eafd71.tar.bz2 |
Set -columnresizemode to "realtime" on OSX and WinNT.
Diffstat (limited to 'demos/demo.tcl')
-rw-r--r-- | demos/demo.tcl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/demos/demo.tcl b/demos/demo.tcl index 0f915c8..ed23514 100644 --- a/demos/demo.tcl +++ b/demos/demo.tcl @@ -559,6 +559,18 @@ proc MakeMainWindow {} { # Give it a big border to debug drawing .f2.f1.t configure -borderwidth 6 -relief ridge -highlightthickness 3 + # Resizing columns can be done in realtime or by displaying a proxy line + switch -- $::thisPlatform { + macosx { + .f2.f1.t configure -columnresizemode realtime + } + windows { + if {$::tcl_platform(os) eq "Windows NT"} { + .f2.f1.t configure -columnresizemode realtime + } + } + } + grid columnconfigure .f2 0 -weight 1 grid rowconfigure .f2 0 -weight 1 grid configure .f2.f1 -row 0 -column 0 -sticky news -pady 0 |