Make window resizable

This commit is contained in:
Alessandro Ranellucci 2012-06-18 11:26:21 +02:00
parent 19a78de82f
commit f38f2f139e
6 changed files with 26 additions and 23 deletions

View file

@ -21,14 +21,11 @@ sub OnInit {
$self->SetAppName('Slic3r');
Slic3r::debugf "wxWidgets version %s\n", &Wx::wxVERSION_STRING;
my $frame = Wx::Frame->new( undef, -1, 'Slic3r', [-1, -1], Wx::wxDefaultSize,
wxDEFAULT_FRAME_STYLE ^ (wxRESIZE_BORDER | wxMAXIMIZE_BOX) );
my $frame = Wx::Frame->new(undef, -1, 'Slic3r', [-1, -1], [760,500], wxDEFAULT_FRAME_STYLE);
Wx::Image::AddHandler(Wx::PNGHandler->new);
$frame->SetIcon(Wx::Icon->new("$Slic3r::var/Slic3r_128px.png", &Wx::wxBITMAP_TYPE_PNG) );
my $panel = Slic3r::GUI::SkeinPanel->new($frame);
my $box = Wx::BoxSizer->new(wxVERTICAL);
$box->Add($panel, 0);
if (eval "use Growl::GNTP; 1") {
# register growl notifications
@ -75,8 +72,7 @@ sub OnInit {
# will not be handled correctly
$frame->SetMenuBar($menubar);
$box->SetSizeHints($frame);
$frame->SetSizer($box);
$frame->SetMinSize($frame->GetSize);
$frame->Show;
$frame->Layout;