3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-10-30 20:21:12 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

3DScene mouse event handler partially moved to c++ - part 2

Browse source
This commit is contained in:
Enrico Turri 2018-05-31 16:04:59 +02:00
parent 276533e236
commit 6bf009edee
12 changed files with 257 additions and 173 deletions
Download patch file Download diff file Expand all files Collapse all files

22
lib/Slic3r/GUI/Plater/3D.pm
View file

@ -50,9 +50,19 @@ sub new {
#==============================================================================================================================
Slic3r::GUI::_3DScene::register_on_select_callback($self, $self->on_select);
#==============================================================================================================================
$self->on_move(sub {
#==============================================================================================================================
Slic3r::GUI::_3DScene::register_on_move_callback($self, sub {
# $self->on_move(sub {
#==============================================================================================================================
my @volume_idxs = @_;
#==============================================================================================================================
print "cucu";
#==============================================================================================================================
my %done = (); # prevent moving instances twice
my $object_moved;
my $wipe_tower_moved;
@ -186,10 +196,12 @@ sub set_on_wipe_tower_moved {
$self->{on_wipe_tower_moved} = $cb;
}
sub set_on_model_update {
my ($self, $cb) = @_;
$self->on_model_update($cb);
}
#==============================================================================================================================
#sub set_on_model_update {
# my ($self, $cb) = @_;
# $self->on_model_update($cb);
#}
#==============================================================================================================================
sub set_on_enable_action_buttons {
my ($self, $cb) = @_;