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

Update preview grid and dimensions according to bed size setting

Browse Source
This commit is contained in:
Alessandro Ranellucci 2012-04-30 22:34:41 +02:00
parent 19a611f832
commit e24990badb
1 changed files with 32 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

48
lib/Slic3r/GUI/Dashboard.pm
View File

@ -76,19 +76,10 @@ sub new {
my ($self, $event) = @_; my ($self, $event) = @_;
my ($obj_idx, $thumbnail) = @{$event->GetData}; my ($obj_idx, $thumbnail) = @{$event->GetData};
$self->{thumbnails}[$obj_idx] = $thumbnail; $self->{thumbnails}[$obj_idx] = $thumbnail;
$self->{canvas}->Refresh; $self->make_thumbnail2;
}); });
# calculate scaling factor for preview $self->update_bed_size;
{
# supposing the preview canvas is square, calculate the scaling factor
# to constrain print bed area inside preview
my $canvas_side = $self->{canvas}->GetSize->GetWidth;
my $bed_largest_side = $Slic3r::bed_size->[X] > $Slic3r::bed_size->[Y]
? $Slic3r::bed_size->[Y] : $Slic3r::bed_size->[X];
$self->{scaling_factor} = $canvas_side / $bed_largest_side;
}
$self->{print} = Slic3r::Print->new; $self->{print} = Slic3r::Print->new;
$self->{thumbnails} = []; # polygons, each one aligned to 0,0 $self->{thumbnails} = []; # polygons, each one aligned to 0,0
$self->{scale} = []; $self->{scale} = [];
@ -411,16 +402,23 @@ sub make_thumbnail {
$convex_hull->simplify(0.3); $convex_hull->simplify(0.3);
$self->{thumbnails}->[$obj_idx] = $convex_hull; # ignored in multithread environment $self->{thumbnails}->[$obj_idx] = $convex_hull; # ignored in multithread environment
$have_threads if ($have_threads) {
? Wx::PostEvent($self, Wx::PlThreadEvent->new(-1, $THUMBNAIL_DONE_EVENT, shared_clone([ $obj_idx, $convex_hull ]))) Wx::PostEvent($self, Wx::PlThreadEvent->new(-1, $THUMBNAIL_DONE_EVENT, shared_clone([ $obj_idx, $convex_hull ])));
: $self->{canvas}->Refresh; threads->exit;
} else {
threads->exit if $have_threads; $self->make_thumbnail2;
}
}; };
$have_threads ? threads->create($cb) : $cb->(); $have_threads ? threads->create($cb) : $cb->();
} }
sub make_thumbnail2 {
my $self = shift;
$self->recenter;
$self->{canvas}->Refresh;
}
sub recenter { sub recenter {
my $self = shift; my $self = shift;
@ -433,6 +431,21 @@ sub recenter {
]; ];
} }
sub update_bed_size {
my $self = shift;
# supposing the preview canvas is square, calculate the scaling factor
# to constrain print bed area inside preview
my $canvas_side = $self->{canvas}->GetSize->GetWidth;
my $bed_largest_side = $Slic3r::bed_size->[X] > $Slic3r::bed_size->[Y]
? $Slic3r::bed_size->[Y] : $Slic3r::bed_size->[X];
my $old_scaling_factor = $self->{scaling_factor};
$self->{scaling_factor} = $canvas_side / $bed_largest_side;
if (defined $old_scaling_factor && $self->{scaling_factor} != $old_scaling_factor) {
$self->make_thumbnail($_) for 0..$#{$self->{thumbnails}};
}
}
sub repaint { sub repaint {
my ($self, $event) = @_; my ($self, $event) = @_;
my $parent = $self->GetParent; my $parent = $self->GetParent;
@ -442,6 +455,9 @@ sub repaint {
my $size = $self->GetSize; my $size = $self->GetSize;
my @size = ($size->GetWidth, $size->GetHeight); my @size = ($size->GetWidth, $size->GetHeight);
# calculate scaling factor for preview
$parent->update_bed_size;
# draw grid # draw grid
$dc->SetPen($parent->{grid_pen}); $dc->SetPen($parent->{grid_pen});
my $step = 10 * $parent->{scaling_factor}; my $step = 10 * $parent->{scaling_factor};