Some spacing between buttons
This commit is contained in:
parent
0f3cbe6fa4
commit
055ea85252
2 changed files with 8 additions and 11 deletions
|
@ -91,17 +91,14 @@ sub new {
|
|||
{
|
||||
my @col1 = qw(load remove reset arrange export_gcode export_stl);
|
||||
my @col2 = qw(increase decrease rotate45cw rotate45ccw rotate changescale split);
|
||||
my $buttons = Wx::GridBagSizer->new();
|
||||
for (my $row = 0; $row < scalar(@col1); $row++) {
|
||||
$buttons->Add($self->{"btn_$col1[$row]"}, Wx::GBPosition->new($row, 0), Wx::GBSpan->new(1, 1), wxEXPAND | wxALL);
|
||||
}
|
||||
|
||||
for (my $row = 0; $row < scalar(@col2); $row++) {
|
||||
$buttons->Add($self->{"btn_$col2[$row]"}, Wx::GBPosition->new($row, 1), Wx::GBSpan->new(1, 1), wxEXPAND | wxALL);
|
||||
}
|
||||
my $buttons = Wx::GridBagSizer->new(10, 10);
|
||||
$buttons->Add($self->{"btn_$col1[$_]"}, Wx::GBPosition->new($_, 0), Wx::GBSpan->new(1, 1), wxEXPAND | wxALL)
|
||||
for 0..$#col1;
|
||||
$buttons->Add($self->{"btn_$col2[$_]"}, Wx::GBPosition->new($_, 1), Wx::GBSpan->new(1, 1), wxEXPAND | wxALL)
|
||||
for 0..$#col2;
|
||||
|
||||
my $vertical_sizer = Wx::BoxSizer->new(wxVERTICAL);
|
||||
$vertical_sizer->Add($self->{list}, 0, wxEXPAND | wxALL);
|
||||
$vertical_sizer->Add($self->{list}, 0, wxEXPAND | wxALL, 10);
|
||||
$vertical_sizer->Add($buttons);
|
||||
|
||||
my $sizer = Wx::BoxSizer->new(wxHORIZONTAL);
|
||||
|
|
|
@ -130,11 +130,11 @@ sub new {
|
|||
EVT_BUTTON($self, $slice_button, sub { $self->do_slice });
|
||||
|
||||
my $save_button = Wx::Button->new($self, -1, "Save config...");
|
||||
$buttons_sizer->Add($save_button, 0);
|
||||
$buttons_sizer->Add($save_button, 0, wxRIGHT, 5);
|
||||
EVT_BUTTON($self, $save_button, sub { $self->save_config });
|
||||
|
||||
my $load_button = Wx::Button->new($self, -1, "Load config...");
|
||||
$buttons_sizer->Add($load_button, 0);
|
||||
$buttons_sizer->Add($load_button, 0, wxRIGHT, 5);
|
||||
EVT_BUTTON($self, $load_button, sub { $self->load_config });
|
||||
|
||||
my $text = Wx::StaticText->new($self, -1, "Remember to check for updates at http://slic3r.org/\nVersion: $Slic3r::VERSION", Wx::wxDefaultPosition, Wx::wxDefaultSize, wxALIGN_RIGHT);
|
||||
|
|
Loading…
Reference in a new issue