Re: ANNOUNCE: eTcl 1.0-rc23 (based on 8.4.16)



Hi.

I wrote the following code.

# begin
package require tile

labelframe .f1 -text {Tile Widget} -bd 2 -relief groove -width 50 -height
50
pack .f1 -fill both -expand 1 -padx 5
pack [ttk::button .f1.b1 -text "Some button"]
pack [ttk::checkbutton .f1.b2 -text "Check button"]
pack [ttk::radiobutton .f1.b3 -text "Radio button" -variable var1]

labelframe .f2 -text {Tk Widget} -bd 2 -relief groove -width 50 -height
50
pack .f2 -fill both -expand 1 -padx 5
pack [button .f2.b4 -text "Some button"]
pack [checkbutton .f2.b5 -text "Check button"]
pack [radiobutton .f2.b6 -text "Radio button" -variable var2]

ttk::style theme use winnative
# end

There are some screenshots of WinXP and WM6.

[etcl for WinXP]
http://www.interq.or.jp/japan/s-imai/etclxp.jpg
[etcl for Windows Mobile 6.0 classic)
http://www.interq.or.jp/japan/s-imai/etclwm6.jpg

It seems that WM6 looks not winnative's theme.

-----
Satoshi Imai
s-imai@xxxxxxxxxxxxxxxxxx


--
Message posted using http://www.talkaboutprogramming.com/group/comp.lang.tcl/
More information at http://www.talkaboutprogramming.com/faq.html

.


Quantcast