GitHub-Proxy/PrusaSlicer
1
0
Fork 0
mirror of https://git.mirrors.martin98.com/https://github.com/prusa3d/PrusaSlicer.git synced 2025-08-04 08:30:41 +08:00
Code Issues Actions Packages Projects Releases Wiki Activity

Use a nicer "All" checkbox for printer compatibility

Browse Source
This commit is contained in:
Alessandro Ranellucci 2017-03-22 21:05:22 +01:00
parent 0b180c6273
commit ce64cb05a1
1 changed files with 43 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

52
lib/Slic3r/GUI/PresetEditor.pm
View File

@ -7,7 +7,7 @@ use File::Basename qw(basename);
use List::Util qw(first); use List::Util qw(first);
use Wx qw(:bookctrl :dialog :keycode :icon :id :misc :panel :sizer :treectrl :window use Wx qw(:bookctrl :dialog :keycode :icon :id :misc :panel :sizer :treectrl :window
:button wxTheApp); :button wxTheApp);
use Wx::Event qw(EVT_BUTTON EVT_CHOICE EVT_KEY_DOWN EVT_TREE_SEL_CHANGED); use Wx::Event qw(EVT_BUTTON EVT_CHOICE EVT_KEY_DOWN EVT_TREE_SEL_CHANGED EVT_CHECKBOX);
use base qw(Wx::Panel Class::Accessor); use base qw(Wx::Panel Class::Accessor);
__PACKAGE__->mk_accessors(qw(current_preset config)); __PACKAGE__->mk_accessors(qw(current_preset config));
@ -242,6 +242,7 @@ sub add_options_page {
sub reload_config { sub reload_config {
my $self = shift; my $self = shift;
$_->reload_config for @{$self->{pages}}; $_->reload_config for @{$self->{pages}};
} }
@ -326,7 +327,9 @@ sub _compatible_printers_widget {
return sub { return sub {
my ($parent) = @_; my ($parent) = @_;
my $btn = Wx::Button->new($parent, -1, "Set…", wxDefaultPosition, wxDefaultSize, my $checkbox = $self->{compatible_printers_checkbox} = Wx::CheckBox->new($parent, -1, "All");
my $btn = $self->{compatible_printers_btn} = Wx::Button->new($parent, -1, "Set…", wxDefaultPosition, wxDefaultSize,
wxBU_LEFT | wxBU_EXACTFIT); wxBU_LEFT | wxBU_EXACTFIT);
$btn->SetFont($Slic3r::GUI::small_font); $btn->SetFont($Slic3r::GUI::small_font);
if ($Slic3r::GUI::have_button_icons) { if ($Slic3r::GUI::have_button_icons) {
@ -334,14 +337,23 @@ sub _compatible_printers_widget {
} }
my $sizer = Wx::BoxSizer->new(wxHORIZONTAL); my $sizer = Wx::BoxSizer->new(wxHORIZONTAL);
$sizer->Add($btn); $sizer->Add($checkbox, 0, wxALIGN_CENTER_VERTICAL);
$sizer->Add($btn, 0, wxALIGN_CENTER_VERTICAL);
EVT_CHECKBOX($self, $checkbox, sub {
if ($checkbox->GetValue) {
$btn->Disable;
} else {
$btn->Enable;
}
});
EVT_BUTTON($self, $btn, sub { EVT_BUTTON($self, $btn, sub {
my @presets = map $_->name, grep !$_->default && !$_->external, my @presets = map $_->name, grep !$_->default && !$_->external,
@{wxTheApp->presets->{printer}}; @{wxTheApp->presets->{printer}};
my $dlg = Wx::MultiChoiceDialog->new($self, my $dlg = Wx::MultiChoiceDialog->new($self,
"Select the printers this profile is compatible with.\nIf none are selected, it will be considered compatible with all of them.", "Select the printers this profile is compatible with.",
"Compatible printers", \@presets); "Compatible printers", \@presets);
my @selections = (); my @selections = ();
@ -352,6 +364,10 @@ sub _compatible_printers_widget {
if ($dlg->ShowModal == wxID_OK) { if ($dlg->ShowModal == wxID_OK) {
my $value = [ @presets[$dlg->GetSelections] ]; my $value = [ @presets[$dlg->GetSelections] ];
if (!@$value) {
$checkbox->SetValue(1);
$btn->Disable;
}
$self->config->set('compatible_printers', $value); $self->config->set('compatible_printers', $value);
$self->_on_value_change('compatible_printers'); $self->_on_value_change('compatible_printers');
} }
@ -361,6 +377,18 @@ sub _compatible_printers_widget {
}; };
} }
sub _reload_compatible_printers_widget {
my ($self) = @_;
if (@{ $self->config->get('compatible_printers') }) {
$self->{compatible_printers_checkbox}->SetValue(0);
$self->{compatible_printers_btn}->Enable;
} else {
$self->{compatible_printers_checkbox}->SetValue(1);
$self->{compatible_printers_btn}->Disable;
}
}
sub options { die "Unimplemented options()"; } sub options { die "Unimplemented options()"; }
sub overridable_options { () } sub overridable_options { () }
sub overriding_options { () } sub overriding_options { () }
@ -712,6 +740,8 @@ sub build {
sub reload_config { sub reload_config {
my ($self) = @_; my ($self) = @_;
$self->_reload_compatible_printers_widget;
{ {
my %overridable = map { $_ => 1 } @{ $self->config->get('overridable') }; my %overridable = map { $_ => 1 } @{ $self->config->get('overridable') };
for my $i (0..$#{$self->{overridable_opt_keys}}) { for my $i (0..$#{$self->{overridable_opt_keys}}) {
@ -1062,13 +1092,17 @@ sub build {
sub reload_config { sub reload_config {
my ($self) = @_; my ($self) = @_;
$self->{overrides_config}->clear; $self->_reload_compatible_printers_widget;
foreach my $opt_key (@{$self->{overrides_default_config}->get_keys}) {
if ($self->config->has($opt_key)) { {
$self->{overrides_config}->set($opt_key, $self->config->get($opt_key)); $self->{overrides_config}->clear;
foreach my $opt_key (@{$self->{overrides_default_config}->get_keys}) {
if ($self->config->has($opt_key)) {
$self->{overrides_config}->set($opt_key, $self->config->get($opt_key));
}
} }
$self->{overrides_panel}->update_optgroup;
} }
$self->{overrides_panel}->update_optgroup;
$self->SUPER::reload_config; $self->SUPER::reload_config;
} }