Make window resizable
This commit is contained in:
parent
19a78de82f
commit
f38f2f139e
6 changed files with 26 additions and 23 deletions
|
@ -19,7 +19,9 @@ sub new {
|
|||
my $self = $class->SUPER::new($box, wxVERTICAL);
|
||||
|
||||
my $grid_sizer = Wx::FlexGridSizer->new(scalar(@{$p{options}}), 2, ($p{no_labels} ? 1 : 2), 0);
|
||||
|
||||
$grid_sizer->SetFlexibleDirection(&Wx::wxHORIZONTAL);
|
||||
$grid_sizer->AddGrowableCol($p{no_labels} ? 0 : 1);
|
||||
|
||||
# grab the default font, to fix Windows font issues/keep things consistent
|
||||
my $bold_font = Wx::SystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
|
||||
$bold_font->SetWeight(&Wx::wxFONTWEIGHT_BOLD);
|
||||
|
@ -101,7 +103,7 @@ sub new {
|
|||
$sizer->Add($sidetext, 0, &Wx::wxLEFT, 4);
|
||||
$grid_sizer->Add($sizer);
|
||||
} else {
|
||||
$grid_sizer->Add($field);
|
||||
$grid_sizer->Add($field, 0, $opt->{full_width} ? &Wx::wxEXPAND : 0);
|
||||
}
|
||||
$fields{$opt_key} ||= [$field];
|
||||
}
|
||||
|
|
|
@ -49,7 +49,7 @@ sub new {
|
|||
$self->{list} = Wx::ListView->new($self, -1, [-1, -1], [-1, 180], &Wx::wxLC_SINGLE_SEL | &Wx::wxLC_REPORT | &Wx::wxBORDER_DEFAULT);
|
||||
$self->{list}->InsertColumn(0, "Name", &Wx::wxLIST_FORMAT_LEFT, 300);
|
||||
$self->{list}->InsertColumn(1, "Copies", &Wx::wxLIST_FORMAT_CENTER, 50);
|
||||
$self->{list}->InsertColumn(2, "Scale", &Wx::wxLIST_FORMAT_CENTER, 50);
|
||||
$self->{list}->InsertColumn(2, "Scale", &Wx::wxLIST_FORMAT_CENTER, &Wx::wxLIST_AUTOSIZE_USEHEADER);
|
||||
EVT_LIST_ITEM_SELECTED($self, $self->{list}, \&list_item_selected);
|
||||
EVT_LIST_ITEM_DESELECTED($self, $self->{list}, \&list_item_deselected);
|
||||
|
||||
|
|
|
@ -66,7 +66,7 @@ sub new {
|
|||
|
||||
my $sizer = Wx::BoxSizer->new(wxVERTICAL);
|
||||
$sizer->Add($buttons_sizer, 0, wxEXPAND | wxALL, 10);
|
||||
$sizer->Add($tabpanel);
|
||||
$sizer->Add($tabpanel, 1, wxEXPAND);
|
||||
|
||||
$sizer->SetSizeHints($self);
|
||||
$self->SetSizer($sizer);
|
||||
|
|
|
@ -101,6 +101,7 @@ sub new {
|
|||
},
|
||||
{
|
||||
title => 'Cooling thresholds',
|
||||
label_width => 250,
|
||||
options => [qw(fan_below_layer_time slowdown_below_layer_time min_print_speed)],
|
||||
},
|
||||
]);
|
||||
|
@ -132,11 +133,7 @@ sub new {
|
|||
{
|
||||
title => 'Post-processing scripts',
|
||||
no_labels => 1,
|
||||
options => [qw(post_process)], # this is not the right place for duplicate_distance
|
||||
},
|
||||
{
|
||||
title => 'Other',
|
||||
options => [qw(duplicate_distance)], # this is not the right place for duplicate_distance
|
||||
options => [qw(post_process)],
|
||||
},
|
||||
]);
|
||||
|
||||
|
@ -149,6 +146,10 @@ sub new {
|
|||
title => 'Flow',
|
||||
options => [qw(bridge_flow_ratio)],
|
||||
},
|
||||
{
|
||||
title => 'Other',
|
||||
options => [qw(duplicate_distance)],
|
||||
},
|
||||
]);
|
||||
|
||||
return $self;
|
||||
|
@ -227,13 +228,15 @@ package Slic3r::GUI::Tab::Page;
|
|||
|
||||
use Wx qw(:sizer :progressdialog);
|
||||
use Wx::Event qw();
|
||||
use base 'Wx::Panel';
|
||||
use base 'Wx::ScrolledWindow';
|
||||
|
||||
sub new {
|
||||
my $class = shift;
|
||||
my ($parent, %params) = @_;
|
||||
my $self = $class->SUPER::new($parent, -1);
|
||||
|
||||
$self->SetScrollbars(1, 1, 1, 1);
|
||||
|
||||
$self->{vsizer} = Wx::BoxSizer->new(&Wx::wxVERTICAL);
|
||||
$self->SetSizer($self->{vsizer});
|
||||
|
||||
|
@ -247,7 +250,7 @@ sub new {
|
|||
sub append_optgroup {
|
||||
my $self = shift;
|
||||
|
||||
my $optgroup = Slic3r::GUI::OptionsGroup->new($self, @_, label_width => 200);
|
||||
my $optgroup = Slic3r::GUI::OptionsGroup->new($self, label_width => 200, @_);
|
||||
$self->{vsizer}->Add($optgroup, 0, wxEXPAND | wxALL, 5);
|
||||
}
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue