3DPrinting/PrusaSlicer-NonPlainar
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

GUI fixes for Windows

Browse Source
This commit is contained in:
Alessandro Ranellucci 2011-10-03 13:08:43 +02:00
parent f2f9178e07
commit 558e86e72d
3 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Build.PL
View File

@ -12,6 +12,7 @@ my $build = Module::Build->new(
'Getopt::Long' => '0', 'Getopt::Long' => '0',
'Math::Clipper' => '1.01', 'Math::Clipper' => '1.01',
'Math::Geometry::Planar' => '0', 'Math::Geometry::Planar' => '0',
'Math::Geometry::Planar::Offset' => '0',
'Moo' => '0', 'Moo' => '0',
'Time::HiRes' => '0', 'Time::HiRes' => '0',
'XXX' => '0', 'XXX' => '0',

8
lib/Slic3r/GUI.pm
View File

@ -25,10 +25,14 @@ sub OnInit {
my $panel = Slic3r::GUI::SkeinPanel->new($frame); my $panel = Slic3r::GUI::SkeinPanel->new($frame);
my $box = Wx::BoxSizer->new(wxVERTICAL); my $box = Wx::BoxSizer->new(wxVERTICAL);
$box->Add($panel, 0, wxALL, 20); $box->Add($panel, 0);
$frame->SetSizerAndFit($box); $box->SetSizeHints($frame);
$frame->SetSizer($box);
$frame->Show; $frame->Show;
$frame->Layout;
return 1;
} }
sub About { sub About {

4
lib/Slic3r/GUI/SkeinPanel.pm
View File

@ -1,6 +1,7 @@
package Slic3r::GUI::SkeinPanel; package Slic3r::GUI::SkeinPanel;
use strict; use strict;
use warnings; use warnings;
use utf8;
use File::Basename qw(basename); use File::Basename qw(basename);
use Wx qw(:sizer :progressdialog wxOK wxICON_INFORMATION wxICON_ERROR wxID_OK wxFD_OPEN); use Wx qw(:sizer :progressdialog wxOK wxICON_INFORMATION wxICON_ERROR wxID_OK wxFD_OPEN);
@ -210,12 +211,13 @@ sub new {
my $sizer = Wx::BoxSizer->new(wxHORIZONTAL); my $sizer = Wx::BoxSizer->new(wxHORIZONTAL);
foreach my $col (@cols) { foreach my $col (@cols) {
my $vertical_sizer = Wx::BoxSizer->new(wxVERTICAL); my $vertical_sizer = Wx::BoxSizer->new(wxVERTICAL);
$vertical_sizer->Add($panels{$_}, 0, wxEXPAND | wxRIGHT, 10) for @$col; $vertical_sizer->Add($panels{$_}, 0, wxEXPAND | wxALL, 10) for @$col;
$sizer->Add($vertical_sizer); $sizer->Add($vertical_sizer);
} }
$sizer->SetSizeHints($self); $sizer->SetSizeHints($self);
$self->SetSizer($sizer); $self->SetSizer($sizer);
$self->Layout;
return $self; return $self;
} }