in reply to checkbutton alignment
use Tk; use strict; use warnings; # Main Window my $mw = new MainWindow; #GUI Building Area my @style_sizes_array = qw(XXS XS S M L XL XXL XXXL); my $buttonFrame = $mw->Frame()->pack(); #checkbutton sizes setup for (my $ctr = 0; $ctr < @style_sizes_array; $ctr++){ my $size_type = $style_sizes_array[$ctr]; $buttonFrame ->Checkbutton(-text => $size_type, -padx=>20, -variable => \$ctr)->pack(-anchor=>'w'); } MainLoop();
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: checkbutton alignment
by skywalker (Beadle) on Nov 12, 2011 at 01:09 UTC |