juli/OrcaSlicer
1
1
Fork 0
mirror of https://github.com/OrcaSlicer/OrcaSlicer.git synced 2026-05-18 19:12:17 +00:00
Code Issues Packages Projects Releases Wiki Activity

Simple mode

Browse Source
This commit is contained in:
Alessandro Ranellucci
2013-01-03 15:49:20 +01:00
parent cf4c090208
commit 7239ca18c1
5 changed files with 316 additions and 145 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
lib/Slic3r/GUI/Preferences.pm
View File

@@ -7,6 +7,7 @@ sub new {
my $class = shift;
my ($parent, %params) = @_;
my $self = $class->SUPER::new($parent, -1, "Preferences", wxDefaultPosition, [500,200]);
$self->{values};
my $optgroup = Slic3r::GUI::OptionsGroup->new(
parent => $self,
@@ -19,16 +20,17 @@ sub new {
tooltip => 'Choose between a simpler, basic mode and an expert mode with more options and more complicated interface.',
labels => ['Simple','Expert'],
values => ['simple','expert'],
default => 'simple',
default => $Slic3r::GUI::Settings->{_}{mode},
},
],
on_change => sub { $self->{values}{$_[0]} = $_[1] },
label_width => 100,
);
my $sizer = Wx::BoxSizer->new(wxVERTICAL);
$sizer->Add($optgroup->sizer, 0, wxEXPAND | wxBOTTOM | wxLEFT | wxRIGHT, 10);
my $buttons = $self->CreateStdDialogButtonSizer(wxOK | wxCANCEL);
EVT_BUTTON($self, wxID_OK, sub { $self->EndModal(wxID_OK); });
EVT_BUTTON($self, wxID_OK, sub { $self->_accept });
$sizer->Add($buttons, 0, wxEXPAND | wxBOTTOM | wxLEFT | wxRIGHT, 10);
$self->SetSizer($sizer);
@@ -37,4 +39,16 @@ sub new {
return $self;
}
sub _accept {
my $self = shift;
$self->EndModal(wxID_OK);
if ($self->{values}{mode}) {
Slic3r::GUI::warning_catcher($self)->("You need to restart Slic3r to make the changes effective.");
}
$Slic3r::GUI::Settings->{_}{$_} = $self->{values}{$_} for keys %{$self->{values}};
Slic3r::GUI->save_settings;
}
1;