New "Slice and save as..." command to specify output filename. #53

This commit is contained in:
Alessandro Ranellucci 2011-12-22 17:38:37 +01:00
parent b1d6420ff4
commit 75cbe879b7
2 changed files with 34 additions and 10 deletions

View file

@ -17,15 +17,23 @@ sub OnInit {
my $frame = Wx::Frame->new( undef, -1, 'Slic3r', [-1, -1], Wx::wxDefaultSize,
wxDEFAULT_FRAME_STYLE ^ (wxRESIZE_BORDER | wxMAXIMIZE_BOX) );
my $panel = Slic3r::GUI::SkeinPanel->new($frame);
my $box = Wx::BoxSizer->new(wxVERTICAL);
$box->Add($panel, 0);
# menubar
my $menubar = Wx::MenuBar->new;
$frame->SetMenuBar($menubar);
EVT_MENU($frame, wxID_EXIT, sub {$_[0]->Close(1)});
EVT_MENU($frame, wxID_ABOUT, \&About);
my $panel = Slic3r::GUI::SkeinPanel->new($frame);
my $box = Wx::BoxSizer->new(wxVERTICAL);
$box->Add($panel, 0);
# File menu
my $fileMenu = Wx::Menu->new;
$fileMenu->Append(1, "Slice...");
$fileMenu->Append(2, "Slice and save as...");
$menubar->Append($fileMenu, "&File");
EVT_MENU($frame, 1, sub { $panel->do_slice });
EVT_MENU($frame, 2, sub { $panel->do_slice(save_as => 1) });
$box->SetSizeHints($frame);
$frame->SetSizer($box);