Posted to tcl by patthoyts at Fri May 04 10:34:05 GMT 2007view pretty

package require Tk 8.5

ttk::style layout RightRadiobutton {
    Radiobutton.padding -sticky nswe -children {
        Radiobutton.indicator -side left -sticky {}
        Radiobutton.label -sticky nswe
    }
}

ttk::style configure RightRadiobutton -anchor e

ttk::radiobutton .b0 -text 100.00 -style RightRadiobutton
ttk::radiobutton .b1 -text 3.22 -style RightRadiobutton

grid .b0 -sticky news
grid .b1 -sticky news
grid columnconfigure . 0 -weight 1

tkwait window .
exit