FIXED: zoom in and out in GUI

Now room in and out can automatically adjust the size of the canvas
qindapao · Jul 20, 2023 · f54568f · f54568f
1 parent 7f6f85e
commit f54568f
Show file tree

Hide file tree

Showing 3 changed files with 10 additions and 3 deletions.
diff --git a/lib/App/Asciio/Actions/Unsorted.pm b/lib/App/Asciio/Actions/Unsorted.pm
@@ -105,6 +105,13 @@ $size = $font_min if $size < $font_min ;
 
 $self->set_font($family, $size);
 
+# resize canvas
+if($self->{UI} eq 'GUI')
+	{
+	my ($character_width, $character_height) = $self->get_character_size() ;
+	$self->{widget}->set_size_request($self->{CANVAS_WIDTH} * $character_width, $self->{CANVAS_HEIGHT} * $character_height);
+	}
+
 $self->invalidate_rendering_cache() ;
 $self->update_display() ;
 }

diff --git a/script/asciio b/script/asciio
@@ -72,7 +72,7 @@ if(defined $asciio_config->{TARGETS}[0])
 
 $window->show_all();
 
-$asciio->{widget}->set_size_request($asciio->{CANVAS_WIDTH}, $asciio->{CANVAS_HEIGHT});
+$asciio->{widget}->set_size_request($asciio->{CANVAS_WIDTH} * $character_width, $asciio->{CANVAS_HEIGHT} * $character_height);
 $asciio->set_modified_state(0) ;
 $asciio->run_script($asciio_config->{SCRIPT}) ;
 

diff --git a/setup/asciio_object/basic.pl b/setup/asciio_object/basic.pl
@@ -5,8 +5,8 @@
 FONT_MIN => 3,
 
 ZOOM_STEP => 3,
-CANVAS_WIDTH => 3000,
-CANVAS_HEIGHT => 4000,
+CANVAS_WIDTH => 200,
+CANVAS_HEIGHT => 150,
 
 USE_MARKUP_MODE => 0,