فهرست منبع

FIX: Warnings

Alexander Koblov 2 ماه پیش
والد
کامیت
fcab889b63
1فایلهای تغییر یافته به همراه2 افزوده شده و 2 حذف شده
  1. 2 2
      src/fviewer.pas

+ 2 - 2
src/fviewer.pas

@@ -1903,12 +1903,12 @@ end;
 
 function TfrmViewer.DoZoomIn: Boolean;
 begin
-  DoZoom( 1.1, 1 );
+  Result:= DoZoom( 1.1, 1 );
 end;
 
 function TfrmViewer.DoZoomOut: Boolean;
 begin
-  DoZoom( 0.909, -1 );
+  Result:= DoZoom( 0.909, -1 );
 end;
 
 procedure TfrmViewer.RotateImage(AGradus: integer);